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PERSONAL COMPUTER MAGAZINE for MZ， XI， andXGeOOO 



SOFT 
BAIUK 


才 一/エック ス 
定価 580 円 


特集 1 日本語 を 処理す るた めの 序章 

特集 2 ADVANCED ED GRAPHICS 続 論 

清水 和 人 流 「プログラミング 道場 j 
X68000 八ン ディ スキャナの 接続 


ひらかれた^ ^生。 


PRO! I 




EXPERT I 


ザ 'ワークステーション。 80M バイト （SCSI は樣） ハード ヂ<ス7， SCSI イン ダーフ x イス を 樣準拔 说。 

SUPER HD 

本体 + キーボード + マウス' トラック ポ一ル 

cz-623c-TN (チタン ブラック） ^mmmMm i \(mv 

ァ一 卜の 糸 i ま。 
EXPERT II 
本体 + キー ポー ド + マウス. トラック ポール 

CZ-603C-BK (ブラック） '-GY (グレー） 標準価格 338,000 円 （税圳 )/HD タイプ CZ- 613C-BK (ブラック) 擦 準 価格 棚 00PK 棚) 

二 エース ヌンァ ード。 
PRO II 

本体 + キーボード + マウス 

CZ-653C-BK (ブラック） '-GY (ダレ—） 欏, 価格 285,000P3( 税 刖) 
HD タ イブ CZ- 663C- BK (ブラック ) •-(;>' (グレー） 標 準 俩侪 395,000 円 （税別) 


次代の ユーザー インターフェイス を象徽 する SX-WINDOW 〃搭載。 

今回の X68000 ニュー シリーズの デビ ュ— に関して ノ、— ドウ エア 以上に ウィンドウ 環境の 提供に 耳目が 集中した こど は、^ 今の ビジ 
ュ アル ユーザ一 インターフェイス 事情 を ふまえれば、 当然の こど ど 言える でしよう。 マルチ ウィンドウ を躯 使して X68000 を コントロールす 
る、 待ち望まれて いた 環境 か' この SX- WINDOW によって * 現される のです。 何の 予備 識も なしに この ウィンドウに 接した 方 は、 一 
見して 従来の ビジュアル シェルの バージョンアップ ど 思われる かもしれ ません か' 、本質的に は 全 〈異質の もの ど 言えます。 ひどつ のゥ 

イン ドウで ある 仕事 を させながら、？' j の ウィンドウで 遠う 仕事に どり かかる。 ひどこ どで 
言えば アプリ ケ一シ ヨン を宾 行させる 環境 どしての ウィンドウ である どい うこ ど。 これ ま 
での ビジュアル シヱル ではで きなかった シーン を 生み出して いま 
す 。複数の アプリケーション を 同 じ 操作の もどで 走らせたり、 アブ 
リケ 一シ ヨン 相互で データの やり どり が 可能になる わけです。 そし 
て、 次代の インテリジェンス を鲜 やかに 象徴す る 4P 皆 調の ハイ セ 
ンスな 画面 処理 —— 。SX-WINDOW をタ一 ゲット どした アブ 
リケ— シ ヨン 開発 もす でに 推進され ており、 これからの 展望 どい う 点から も 大いに 期 
待され る どころ です。 また、 この SX-WINDOW は ディスクに よって 供給され、 BIOS 
の 高速 化 （平均 2 倍） も 含めて OS である Human68k の 機能 を 拡張。 ニュ— シリーズ 
のみならず、 すべての X68000 で この 新しい 環境が 亨受 できます。 



1「 …'塵 



*SX-WINDOW の 起動に は、 メインメモリ 2MB が 必要です。 CZ-6OOC/601C/611CZ652C/653C/662CZ663C で SX-WINDOW を ご 使用の 探に は. あらかじめ 別売の 1MB 增投 RAM ボード を增投 してく ださ L 


XI68000 

PERSONAL WORKSTATION 

SUPER • EXPER TPRO 


ほ 型 カラー ディスプレイ テレビ （ドット ピッチ 0.39""") 

ほ 型 カラー ディスプレイ テレビ （ド ツ トビ ツチ 0.39™) 
1 5 型 カラ 一ディスプレイ テレビ （ドット ピッチ 0.31™) 
M 型 カラー ディスプレイ （ドット ビッ刊 .31™) 
1 4 型 カラ —ディスプレイ (ドット ピッチ 031mm ) 

21 型 カラ一 ディスプレイ (ドット ピッチ 0.52,) 


—充実の ディスプレイ ラインアップ 

CZ-602D-BK (ブラック）' -GY (グ レニ） 樣準 価格 99.800 円 （チ ルト スタンド 同梱 '税別） 

CZ-605D-BK (ブラック） '-GY (グレー） 樣準 価格 1 ほ. 000 円 （スビ 一カー 2 個/ チルト スタンド 同 梱'稅 別） 

CZ-613D-TN (チタン ブラ フク)' -BK (ブラック) -GY (グ ド: …… 標準価格 135.000 円 （スビ 一力一 2 個/ チルト スタンド 同捆 '悦3 リ） 

02-6030-8に（プラック）'-6丫(^^1 ^一 ) 攞 * 価格 84.800 円 （チル ト スタンド 同 梱'稅 別） 

CZ-604D-BK (ブラック） '-GY (グレー） 標準価格 94.800 円 （スピーカー 2 個/ チルト スタンド 同梱' 稅別） 

CU- 21HD-BK (ブラック） 標準価格】 48.000 円 （スピーカー 2 個 同梱' W 別） 

» 印の 商品 は 在庫 僅少です。 


シャープ 


パソコン 教室 開催中 


* 会場： 市ケ谷 教室 シャープ 柬京 支社 ビル * コース： 入門: 

—ス' 表 集 針 コース • 音楽 コース' 給 画 コース * 申込 受付 電 Si 

番号 ： （03) 260-8365 • 受講 料 ： 2 . 000 円 （稅別 ） 


EXE リーダー ズ グッズ 


プ レゼ ン卜 実施 中 


* いま、 EXE 会員より ご 紹介のお' お^ 力; EXE ショ ッフ' で X68000 シリーズ を 0« 入され ますと、 
EXE 会 S に EXE リーダー ズ グッズ を プレゼントし ます。 詳しく は EXE ショップに お問い合わせ 
ください。 * また、 X68000 シリーズ を ご W 入の お客様 は. ぜひ EXE クラブに ご 入会く ださい。 


お問い合わせ は …シャープ㈱ 電 子 機器 事業本部 システム 槻器 営業部〒 545 大阪市 阿倍野 区長 池 町 22 番 22 号 S(06)62 卜に 2t (大代 表） . „ „ Ag. 1' Q A I 
電子 機器 事業本部 液晶 映像 システム 事業部 第 2 商品 企 面部〒 162 東京都 新 宿 区 市 谷 八 « 町 8 番地 《(03)260-1 161 ( 大代 表） W^^j/ofm^i'an 


き 特集 1 


- 日本語 を娜 里す るた めの 序 

早 

.„ ワープロ を 使う 前に 

4 ° 日本語 を 書く ための 7 つの 方法 

吉田幸 一 

C1 X68000 の 曰 本 語 環境 を 見る 

51 我慢せ ずに 使う WP. X 

中 野修ー 

c _ 雷 語 1 号 はどうなる のか 7 

5 ° ホメ ォスタ シスへの 道 

祝 一平 

c _ ASK8BK 用 辞書 メンテナンス ツール < 前 »> 
58 辞書 整備 基本 編 

村 田敏幸 

肇 特集 2 

， , „ ADVANCED 2D GRAPHICS 紼論 

1 1 3 デジタル ペイ ン ティ ング への 道 

丹 明彦 

參 カラー 紹介 

on OhIX Graphic Gallery 

20 2 ログ ラフ ィ ック続 論/ D(i)GA • CG アニメーション 

•THE SOFTOUCH 

_„ SOFTWARE INFORMATION 
2c 話題の ソフ卜 ウェア 

GAME REVIEW 

24 卜ン ネル ズ S 卜 ロールズ 
26 □- Again 
28 シ厶 シティ 一 
30 ギャラ ガ' B8 
31 ク オース 

32 Communication PRO-BBK ver.E.O 

水 野一 雄 
古村 聡 
荻瘙 圭 
西 川 善 司 
'西 川 善 司 
吉田幸 一 

AFTER REVIEW 

34 大 航海 時代/プロ ミス 卜 ランド 
ウル ティ マ V/SX-WINDOW 

鲁シ リ一ズ 全 機種 共通 システム 

145 THE SENTINEL 

146 BILLIARDS 

金子 勇 


く スタッフ〉 

鲁霸 集： 前 田 像 會編 集ノ 植木 章 夫 岡 崎栄子 浅 井 研 二 鲁協 カノ 有 田隆也 中 森 章 後藤 資行 

林 一樹 荻窻圭 岡本浩 一郎 毛 内 俊 行 吉田 » 司 影 山裕昭 相 馬英ほ 古村 聪 村 田敏幸 丹 
明彦 三 沢和彥 長 沢淳博 宫島 靖 金子 俊 一 浦 川 博 之 山 田 純 二 • カメラ/杉 山 和 美 秦ィ ラス 
ト /永 沢 しげる 山 田睛久 小 栗 由 香 • アートディレクター/島 村 勝 頼 參 レイアウト/元 木 g 子 AD 
GREEN 眷 校正 ノ グループ ごじら 


E 


T 


S 


^^もの 


140 

第 41 回 知能 機械 概論 一 お茶 目な 計 » 櫬 たち —— 
超能力 実験の 成果 

有 田隆也 

142 

猫と コンピュータ 第 51 回 

PTA は 2 度 死ねない 

» 沢恭子 

144 

X-OVER NIGHT 第 4 括 
流行歌 を 追え ！ 

离原秀 己 

秦 連載/ JS^ /講^/プログラム 

OD 

新製品 紹介 

ビデオ ボード/ C compiler PRQ-68K 


QQ 

00 

新 連 « 大人の ための X6BOO0 第 1 回 
長い 能書きで ごめん 

获逢 圭 

4U 

新 連載 清水 和 人 流 プログラミング 道場 その 1 
アマ グラマに 花道 を 


71 

PASCAL プログラミングへの 招待 <4> 

PASCAL の 制御 構造， 関数お よび 手続き 

藤 井義已 • 藤 木健士 

76 

X- 日 ASIC ブ ログ ラミン ^理 実習 (14) 

ファイルの 魔術師 f seek 関数 

泉 大介 

81 

X6B0G0 マシン 語 プログラミング 〈入門 纏〉 Chapter 10.. 
直接 グラフィック を 操作す る 

村 田敏幸 

89 

X6 隱用 

八ン ディ イメージ スキャナ アダプタの 製作 

林 曜三 

104 

DoGA • CG アニメーション 講座 02》 
こんな 表現， あんな 表現 

かまた ゆたか 

1E5 

XB8D0Q CARD. FNC 用 カード ゲーム 

赤黒 (SPEED) 
已 LACK JACK 

* 生 勝 

毛 内 俊 行 

129 

OhIX LIVE in "90 

風の 谷の ナウ シカ （XBBD00) 
ラジオ 体麟ー (XI /turbo) 

安藤 正洋 
神 生 総 一 

132 

(で） の ショー 卜 プロば 一て い その 13 

なさけなくない 星 7> 

古村 聡 

136 

八 一 ドウ エア 工作 入門 <3〉 

基本 インタフェイス 回路 その 3 

三 沢和彦 

152 

マシン 語 カクテル in zaO's Bar 第 は 回 
八 ッシュ で チェック 

山 田 純 二 

156 

PC-E5(KJ テーブル 卜ーク RPG サ ポー 卜 システム (2) 

マスター 戦闘支援 ツール CST 

松 井 信 

愛親 者ブ レゼ ン卜 …… ほ 1 

ペンギン 情報 コーナ一 …… 1B2 
FILES OhIX …… 1B4 
OhlX« 問 箱 … 166 
STUDIO X …… 1BB 

纏 集 室から/ DRIVE ON/ ごめんなさいの コーナ一/ SHIFT BREAK/mlcroOdyssey …… 172 


UNIX (3 AT&T BELL LAB0RA 丁 ORES の OS 名です ， 
Mach は カーネギーメロン 大学の OS 名です。 
CP/M. P-CPM, CP/Mplus, CP/M-86. CP/M-68K. CP/M- 
8000. DR-D0S は DIG ぽ A し RESEARCH 
OS/2 は 旧 M 

MS-DOS. MS-OS/2, XENIX. MACR080. MS C は MICRO 
SOFT 

MSX-DOS は アスキー 

OS-9, OS-9/68000, OS-9000. MW CUMICROWARE 

UCSD p- system は 力 リ フォルニ ァ大 学理 事 会 

WordStar. WordMasterUWOROSTAR International 

TURBO PASCAL, TURBO C, SIDEKICK は BOLAND INTER 

NATIONAL 

LSI C は LSI JAPAN 

HuBASK; はハ ド ソン ソフト 

の 商標です。 その他， プログラム 名， CPU は 一 « に * 
メーカーの 8» 商標です。 本文 中で は" TM", 'R' 'マー 
クは明 E していません， 

本 K に »«6 された ブ a グラムの 著作 權 はブ a グラム 
作成者に 保 S3 さ れ ています。 著作 權 ム PDS と 明 1£ さ 
れ たもの 以外， AB 人で 使用す る ほかの 無断 は » 
じられ ています， 


國 広告 目次 

アイ. ェ ―. ェム |91( 上） 

アイツ 一 188 

アイ ビッ ト 電子 190 

アクセス 192 

エス ビ一 エス 178 

AVC フタ バ電槻 179 

ォ 一エー ブレイン 182 

オーエー ラン ド 187 

計測 技研 180-181 

ザイン ソフ ト 9 

J & P 表 3 

システム サ コム II 

シャープ 表 2* 表 4'1*4- 8 

ソフト クリエ イト 189 

ソフ マップ 184*185 

九十 九電槻 ほ 

ティ一 アン ドィ一 ソフ ト 12-13 

DISK シャ トル 高槻 186 

デン キヤ 183 

パソコン プラザ ォク ト 16*17 

ビクター 音楽 産業 14 

P&A 18*19 

満開 製作所 191 (下） 

口 ゴス システム 10 


SHARP 


クリエ ィ ティブ マインド あふれる 周辺機器が 



ディスプレイ 関連 


アート ツール 


プリンタ 


ファイル 


カラ-ディスプレイ テレビ 


カラー ディスプレイ 


画像 入力 



ほ 型 カラ一 ディスプレイ テレビ 

CZ-602D-BK 
★CZ-602D-GY 

襻準 価格 99,800 円 （稅 別） 

(チ ルト スタンド 同梱） 


M 型 カラ一 ディスプレイ 
CZ-603D-BK--GY 
標準価格 84,800 円 （稅 別） 

(チル ト スタンド 同梱） 



15 型 カラ 一ディスプレイ テレビ 
C2-605D-BK--GY 

標準価格 115,000 円 （稅 別） 
(スピーカー 2 個 'チル トス タン ド同捆 ) 


14 型 カラ一 ディスプレイ 
CZ-604D-BK--GY 

樣 準 価格 94,800 円 （说 別） 
(スピーカ—， 'チル トス タント '同相） 



15 型 カラー ディスプレイ テレビ 
CZ-613D-TN--BK--GY 

棣準 価格 135,000 円 （税別） 
(スピーカー 2 儂 'チル トス タント' 同捆） 

CRT フィルター 


21 型 カラー ディスプレイ 
CU-21HD 
標準価格 148,000 円 （^別） 
(ス ビープ 


チューナ- 



S 性能 CRT フィルタ一 
BF-68PRO 
標準価格 19,800 円 （稅别 ） 

(14/ ほ 型 用) 


RGB システム チューナー 

CZ-6TU-BK-GY 

裸 * 価格 33,100 円 （悦 別） 
(リモコン ィ 寸） 




スキャナ 用バ ラレ ルポ一 ド 
CZ-6BN1 

樺 準 価格 29,800 円 （悦 別） 


映像 入力 


CZ-6VT1-BK 
CZ-6VT1 

欏準 価格 69,800 円 （栈 別） 


映像 出力 



カラー プリンタ 


ドット プリンタ 


國 


ハードディスク 


カラ一 イメージ スキャナ * ， 

CZ-8NS1 

樺 *«6 格 188,000 円け 兑別） 


ビデオ ボード 
CZ-6BV1 

標準価格 21,000 円 （^別） 
*ffi»i/o ポートお ス ひ ノト 使用し ます- 


*1 ご 使用に K (して は， カラー イメージ スキャナ CZ"8NS1 に 同梱の RS-232C ケーフ 
*2 CZ^eOSD.'etMD.GU-ZlHD を ご 使用の 場合 は、 ROB システム チューナー C2"6TU (別売） が 必» です。 
#3 別 ft の tl 号 ケーブル IO-73CX** 価格 る，训円ひぉリで接妍して下さぃ- 


？^ット 
熱 転写 カラー; 藥 字 プリンタ 

★ CZ-8PC3 

權* 価格 65,800 円 （稅 別) 

(信号 ケー 



48 ドット 

熱 転写 カラー; 典 字 プリンタ 

CZ-8PC4 

CZ-8PC4-GY 

標準 佃 格 99,800 円 (漏 

(信号 ケーブル 同梱） 

カラー ビデオ プリンタ 



カラー ビデ 才 プリンタ 
CZ-6PV1 

檷 * 価格 198,000 円 （税別） 
(ほ 号 ケーブル 阆梱） 

カラー イメージ ジェット 


24 ビン 

カラー; 興 字 プリンタ 
CZ-8PG1 

標準価格 130,000 円 別） 

(信号 ケーブル 同梱） 



ハート' ディスク ユニット (20MB) 
CZ-620H 

標準価格 178,000 円 （税別） 


£nb な 


24 ビン 

カラ一 i 萬 字 フリン タ （に6 桁） 
CZ-8PG2 

權準 価格 160,000 円 （税別） 
(信号 ケーブル 同捆） 


24 ビン; SI 字 プリンタ （136 桁） 

CZ-8PK10 

樣 * 価格 97,800 円 別） 

(信号 ケーブル 同梱） 


増設 用 ハードディスク 

ドライブ （40MB) 

(CZ-602C/603C/652O 
653C 内 眼 用） 

CZ-64H 

禰 * 価格 120,000 円 別 > 
(取 付資 別） 
※取 付に M して は シャープ 

お 客« ご 相 ISS 口にて ご 

相 はく ださい。 


カフ— ィ メーン ジェッ I- * J 
IO-735X 

標準価格 248,000 円 （悦 別） 

(信号 ケーブル 別売） 

-, 別売の スキャナ 用 パラレル ポート' CZ"6BN1 標準価格 29.800 円 （税別） で 接 H してく ださい。 


sm-xm^^m シリーズ 用 



筒 辺 悔ぁ 

標準価格 は 税別です。 

• 立体 映ィ 象セッ ト ★ GZ>8BR 1 

29, 800 円 

*24 ビン 漢字 プリンタ （136 析） 

CZ-8PK10 97. 800 円 


攀 パーソナル テロ ツバ *2 C2-8DT2 

44,800 円 

• 24 ドット 熱 転写 カラ— 漢字 ブリ》 

★CZ-8PC3 65, 800 円 




*48 ドット 熱 転写 カラ-漢字 プリンタ 

CZ-8PC4 99. 800 円 


カラ一 ディスプレイ 

FM 音源 

1 

* 48 ドット 熱 転写 カラー 漢字 プリンタ 

CZ-8PC4-GY 99, 800 円 

* 21 型 カラ- 

-ディスプレイお CU-21HD 148,000 円 

暑 ステレオタイプ FM 音源 ボード GZ^8BS1 

23 ,800 円 

* カラ一 ビデオ プリンタ 

OZ-6PV1 198, 000 円 



スピーカー (2 本 1 組) 標準 装備， ミュージック ツール 同梱 

* カラー イメージ ジェット 

IO-735X 248. 000 円 


映像 • 画像 入力 編集 装置 

ブリン 夕 




肇 カラー ィメ 

ージ スキャナ CZ"8NS1 188, 000 円 

• 24 ビン カラ— 漢字 プリ^ (80 桁） OZ-8PG1 

130, 000 円 

ファ ィゾレ 

* カラ一 ィメ 

—ジ ポー ド II GZ-8BV2 39,800 円 

• 24 ビ劢 ラー 漢字 プリ》 CZ-8PG2 

160. 000 円 

参 ミニ フロ 'ビ— デ f スク ュニボ 2HD-2D ド ' 3 

★CZ-520F 118. 000 円 


^ f| |y~i5&TjRxtT3 , ^l 鲁 お問い合わせ は… シャープ 嫩 電子 機器 事業本部 システム 機器 営業部〒 545 大阪市 阿倍野 区長 池 町 22 番 22 号 tt(06)62 卜 1221 ( 大 f 

が L 


シャープ ペリ フエ ラル ファミリー 

1X68000 


X68000 を サポート。 




ネットワーク 


その他 


拡張 メモリ 


インタ一 フェイス 


数値 演算 プロセッサ 


モデム 





設 RAM ポ一ド 
(CZ"600C 専用） 
CZ-6BE1 

標準価格 35,000 円 （税別） 


ユニバーサル I/O ホード 
CZ-6BU1 

価格 39,800 円 （悦 別） 



に n!— 


数値 演 » フロ セッサ ポー ド 

CZ-6BP1 

標準価格 79,800 円 （稅 別） 
FAX 


1MB 增設 RAM ポー ド 

(GZ"601C'6UC'652C 

6530/6620/6630 用) 

CZ-6BE1B 

標準価格 28,000 円 け兑 別） 


GP- 旧 ホード 
CZ-6BG1 

欉準 価格 59,800 円 別） 




FAX ポート' 

CZ-6BC1 

標準価格 79,800 円ひ兑 別） 


MIDI 



2MB 增投则 ポ―ド * 4 

CZ-6BE2 

欏 * 価格 79,800 円 （^別） 


* 投用 RS-232C ポート' 
(2 チャンネル） 
CZ-6BF1 

樣享 価格 49,800 円 （稅 別） 




MIDI ポー ド 

CZ-6BM1 

11* 価格 26,800 円 （悦 別） 


4MB 増設 RAM ポート' *" 
CZ-6BE4 

標準 他 格 138,000 円 （税別） 




拡張 スロット 


モデム ュニッ 
CZ-8TM2 
ffiiff 価格 49,800 円 （稅 別） 

(RS-232C ケーブル 同梱） 

RS-232C ケーブル 


RS-232C ケ一 フル 

(平行 接続 型） 

CZ-8LM1 

額舉 価格 7,200 円 (棚) 


o 


RS-232C ケーブル 
(クロス 接続 型） 

CZ-8LM2 

揮 準 価格 7,200 円 （fe 別） 

し AN ポ一ド 



LAN ポー ド 
CZ-6BL1 

摞準 価格 268,000 円 （稅 別） 
(イーサネット 用） 
CZ-6BL2 

棵準 価格 298,000 円 （税別） 
(イーサネット/ チーバ ネット 両用） 
秦霄 » ユニット ，ソフト ゥ i ァ 

(ネットワーク ドライバ Verl.O) 同捆 


インテリジェント コントローラ 

CZ-8NJ2 

樺 # 価格 23,800 円 （税別） 



マウス • トラック ポール 

CZ-8NM3 

tli ャ: 価格 9,800 円 （悦 別） 


トラック ポール 
CZ-8NT1 

棵準硒 格 13,800 円 (税別) 


CZ-8NM2A 

檷準 価格 6,800 円 （税別) 


帽 umm 、 


'ノ 3 ィ 刀ート 

CZ-8NJ1 

揮 W ま 1,700 円 (醜) 



拡張 I/O ポ ックス (4 スロット） 
(CZ.600C '60】O602C 603C 
611C/612G/613C/6230ffl) 

CZ-6EB1-BK 
CZ-6EB1 

fll* 価格 88,000 円 (稅 別） 


スピーカ- 



アン フ内 SR 

スピーカー システム (2 本 1 組） 
AN-S100 

檷準 価格 36,600 円 （は 別） 


システム フック 



レス アム フック 

(CZ-600C/601C/602C/603C' 
6110/6l20/613C/6230ffi) 

CZ-6SD1 

標準価格 44,800 円 (稅 別） 


«4 ご 使用に 際してば あらかじめ 刖？ E の 1MB 増投 RAM ポー ド CZ"6BE1 權準 価格 35,00：)円（稅別'02乇000用）、02"68£13 1» 準 価格 28.000円（稅別'(52"60】に02"6110,6520,6530、6ぉ0,5630用）を增投して<ださぃ。 

ーズ 用です- 


• ミニフロッピーディスク ユニットに D) 

★CZ-502F 

99. 800 円 

• ミニ フロッピー ディ;^ ユニット (2D'l ドライブ 

CZ-503F 

49, 800 円 

• 增設 S ミニ フロッピ-ディスク ドライブ (2D) * 

d OZ-53F-BK 19, 800 円 


拡張 ポ一 ド* 

その他 

1 

• モ テム ュニッ 卜 （300/ 】 200 ポ一 

CZ-8TM2 

49. 800 円 

*320KB 外部 メモリ 

CZ-8BE2 

29. 800 n 

• RS-232C' マウス ポート' * 5 

CZ-8BM2 

19. 800 円 

• フ ひ；/ ビー ディスク インターフェイス 《 6 

CZ-8BF1 

14,800 円 


肇 JIS 第 1 水準 漢字 ROM* 7 

C./_ ； BK:: 

19. 800 円 

• RS^32C 用 ケーブル (平行 接続 型） 

GZ"8 し Ml 

7. 200 円 

• RW32C 用 ケーブル (クロス 接続 型） 

し 

7, 200 円 

* 拡張 I/O ボックス 

CZ-8EB3 

33 .800 円 

• RF コンノ 、'一 タ * 8 

AN-58C 

2. 980 円 

• インテリ ジ: r. ン卜 コント 口一 ラ 

CZ-8NJ2 

23. 800 円 

* マウス' トラック ポール 

CZ-8NM3 

9. 800 円 

• マウス 

CZ-8NM2A 

6. 800 円 

• トラック ボール 

C2-6NT1 

13, 800 円 


• ジョイ カード 

CZ-8NJ1 1 .700 円 

* チルト スタンド 

CZ-6ST1-E--B 5. 800 円 

• 高' 1 生 能 CRT フィルター 

R9 BF-68PRO 19. 800 円 

* スキャナ 用 パラレル ポ一 

K* 10 CZ-8BN1 27. 800 円 


き 品番 中の-表示 は、 B く ブラック >'E く才 フィス グ L ^一 > を 示します。 
*1 XI タ一ポ Z シリーズ 用 《2 CZ^862C に は 接^で きません。※ 
3 XI タ一ポ シリーズ 用 》4 GZ~830G 用 《5 XI シリーズ 用 》6 
CZ^850C で CZ-520F を 使用す る 場合に 必要 《7 OZ-800C-801 
C、802G、803C,8〗1G、820C 用 》8 CZ^820C、822C、830C 用 《 
9 14/15 型 用 》10 CZ>8NS】 用 * 接続 等の 锐明 にっきまして は、 
周 ifl 槻器 総合 カタログ を ご 参照く ださい。 

★ 印の 商品 は 在庫 僅 少 です。 


機器 事業本部 液晶 映像 システム * 菜 部 第 2 商品 企画 部〒 162 東京都 新 宿 区 市 谷 八幡 町 8 番地 11(03)260-1 161 ( 大代 表） 


SHARP 

"アート" と 呼べる 高水準の ソフトウェアが 


次代の インテリジェンス、 

ウィンドウ 環境 を あなたの X68000 で 


ユーザー 本位の 操作 環境 を 提供す る フル 画面 マルチ 
ウィンドウ タイプの 美しい デスクトップ (テキスト 面/単色 

4 階 調 + カラー 4 色、 グラフィック 面/カラー 65 , 536 色 中 
16 色）、 イベント 'ドリブン 型 マルチ タスク 処理に より 複数 
の 作業 を 同時に 処理で きる 疑似 マルチ タスク や 入出力 
装置の 設定が 簡単に 行える 多 機能 コントロール パネル 
を 搭載した 本格 ウィンドウ システムです。 従来の ビジ ユア 
ル シェルと は 異なり、 今後の アプリケーション ソフトが 統 
—された 操作 環境で 実行で きる ようになります。 



OX-WINDOWverW 


CZ-259SS 10 万 合 達成 ご 愛用 感謝 価格 6. 800 円 （税別） 



一^ i 


高速 通信 を サボ一 ト。 これからの、 
そして さまざまな 通信 環境に 対応す る 
高機能 コミュニケーション ソフト。 

Communication PRO~68K のバ一 ジョン アップ 版です。 300BPS 
力、 ら 19.200BPS までの 通信速度に 対応し、 パソコン 同士の 接続 
や 各種 データベースの 漢字 端末に、 また ホスト コンピュータとの 
データ通信に 利用で きます。 さらに MNP モデムへの 対応で ノ、 
ード フロー制御 （GTS/RTS) を サポート。 その他、 高速 逆ス クロー 
ル 機能 、オート ログイン/オートパイロットが 可能な 自動 実行 槻能、 
コンカレント 機能 も 装備。 行 入力 機能 や スクリーン エディタ など 
豊富な 編集機能 も 魅力です， 
また ソ、' イナ リファイ ルを 転送 
する プロトコルと して X modem 
(128/SUM、128/〇RC、1K)、 
Ymodem(G、 BATCH, G-BA 
TGH)、Translt2 (TEXT, B I 
NARY) プロトコル も サポート 
しています。 



ぼ., 

.caul 


CZ-257CS 


標準価格 

19, 800 円 （税別） 


Communication p R ?«? K 


ソースコード デバッガ を はじめ、 
^^開発 ツール を 強化。 

バ一 ジョン アップ された c コンパイラ。 

c の ソース レベルで デバッグ できる ソースコード デバッガ を 搭載 
した ほか、 各種 開発 ツール を 強化した 総合開発 ツールです。 ま 

た、 ライブラリ は Human68k ver2.0 の 拡張 DOS コール も サポ一 
卜して いるな ど、 より X68000 のハ一 ドゥエ ァを 活かせる S 富な ライ 
ブラ リ （約 800 種） となって います。 強力な MAKE も 新たに 追加。 
C 言語の 標準で ある ANSI 規格 準拠 を さらに 強化し、 プロトタイプ 
宣言 も デフォルトに 変更され ました。 r BASIG-C コンバータ」、 「 ァ 
セン ブラ」 、「リンカ」、 「デバ ッ 
ガム 「ソースコード デバッガ」、 
「アーカイバ j、 r ライ ブラ リア 
ン」、 r コンバータ」 などの ッ一 
ルが 装備され ています。 


r 


8 月 発売 予定 



ぷ'' 

^t^— iSf&fjRXlSM 攀ぉ 間い 合わせ は …シャープ 子 糠 器 事業本部 液晶 映像 システム 事業部 第 2 商品 企画 部 于162 東京都 新 宿 区巿谷 八幡 町 8 番地 0(03)260-1 161 ( 大代 表) へ。 

《麵、 


シャープ ォ リ ジナ ルソフ トウ エア 

XX68000 


Hyper word 


TOP 給与 計算：！: キス パート 


TOP 財務 会計 


NEW PrintShop 60k 


Musicstudio パ 60tc ve に 1.1 


OS-9/X68000 


Human68k ver2.0 


^111 II III Tl III II Ml リ 



CYBERNOTE w 側 


CARD ^システム 手银リ フィル 集 


CARD 用 活用 フォーム 集 


MUSIC k 60K MIDI 


ソンク ライフ ラリく 101 曲 *〉 



き PRO-60K 


Stationery ゆ 


グラフィック ライブラリ VO し 1 


グラフィック ライフ ラリ VO し. 2 


Sampiina ヾ. 6ok 


SOUND 60k 


DATA 60k 


M 


SIC リ 60K 



■CZ-240BS « 準 価格 14.800 円 （锐 別） 

他の ソフト を 起動す る 前に、 この Sta 
lioneryPRO>68K を一 度起勖 する だけ 
で、 他の ソフト を 実行中に も 1 " ス ケジュ 
ール ゾ 住所 S ま」 など 多彩な 機能 を ワン 
タ ツチで 使用で きます， シャープ 電子 
手帳との データ 送受信 も 実現。 （別売 
の 通信ケーブル GE-200 しが 必要)。 



■CZ-220BS 標準価格 58.000 円 （稅 別） 
入力の 手間 を 軽減す る ヒストリ 一 
機能 を 装備した、 コマンド 型 リレー 
シ ョナル データべ一 ス です。 

■CZ-212BS 標準価格 68.000 円 （税別） 
スプ レツ ド シート （表 計算）. データ 
ベース、 グラフ 作成 機能 を 一体化 
させた 統合 ビジネス ツールです， 


■CZ-235GS 標準価格 8.800 円 （税別） 

暑中見舞 用 を 中心とした NEW Print 
Shop PRO"68K 用 グラフィック データ 集,, 

■C2-236GS 標準価格 8,800 円 （税別） 

年賀状 を 中心とした NEW Print Shop 
PRO- 68K 用 グラフィック データ 集つ 


■CZ-215MS 標準価格 17.800 円 （税別） 
AD PCM 機能 を 活かす 高機能 サ 
ン プリング エディ 夕。 多彩な ED ぼ OR 
を 装備、 サン フリング 音の データ は 
BASIC でち i 舌 用で きます。 


■CZ-214MS 標準価格 ほ. 800 円 （稅 別） 

スタジオの コンソール パネル を 操 
作す る 慼覚で FM 音源に よる 音 創 
りが 楽しめる サウンド エディタ。 

■CZ-2I3MS 標準価格 18.800 円 （税別） 
最大 8 バートの スコア （総譜） が 害 
け、 内蔵の FM 音源で 演奏で きる 
楽譜 ワープ □& 演奏 用 ツール。 


THE^ 袋 V2.0 


AI-68K Staff USP/OPS PR068K 


、- 


ハ ■: 







シュ一 ティング ゲーム 
ぐン イン ビ一〉 

■CZ-217AS 
標準価格 7,800 円 （税別） 
CK0NAM1. 】988 

シ ユー ティング ゲーム 
く沙 51* 蛇 > 
騸 CZ-2I8AS 
標準価格 8，80D 円 （税別） 
©KONAML 1989 

ブロック ゲーム 
く アル カノ イド > 
■CZ-222A5 
標準価格 7, 800 円 （税別） 
©TAITO CORP. 1987 

ドライブ ゲーム 
く フルスロットル > 
騮 CZ-231AS 
標準価格 8. 800 円 （税別） 
©TAITO CORP. 1988 

スポーツ ゲーム 
く 熱血 S 校 

ドッジボール 部 > 
■CZ-232AS 
標準価格 7. 800 円 （稅 別） 
©TECHNOS JAPAN CORP. 1988 

アクション ゲーム 
ペック マニア > 
ICZ-233AS 
標準価格 7.8C0 円 （稅 別） 
©NAMC0 

アクション ゲーム 
く ニュージーランド 
スト一 リー〉 
■CZ-230AS 
標準価格 8. 800 円 （抉 別） 
(©TAITO CORP. 1989 
スポーツ ゲーム 
く V'BA しし > 
■CZ-246AS 
標準価格 7. 900 円 (税別） 
©TECHNOS JAPAN CORP 1989 





パイク レ一 シン グ ゲーム 
< スーノ 《一/ \ ング才 ン> 
■CZ-238AS 
標準価格 8. 800 円 （税別） 
©SEGA 1987 

ジ i' ノト ヘリ' シミュ 1<~ショ>/ —ム 
く サンダー ブレード > 
■CZ-239AS 
標準価格 9.500 円 (税別） 
©SEGA 1987 

アクション ゲーム 

< ダウンタウン M 血 物 S> 

■CZ-254AS 

標準価格 8.800 円 （税別） 

^TECHNOS JAPAN CORP. 19 


醒 CZ_2 ほ SS 標準価格 29.800 円 （税別） 
0S-9 の もつ マルチ タスク 機能、 リ ァ 
ル タイム 機能 を 活かした 使い易く 

機能的な OS 凍 境 を 提供。 これまで 

の データ 資産 も 活かせます。 

!K 0S-9 は マイク ロウ i ァ 社の 登お 商檷 です， 


■CZ-244SS 標準価格 9.800 円 （税別） 
■CZ-224LS 標準価格 9,980 円 （税別） 
■CZ-234LS 樣率 価格 188.000 円 （税別） 


CA 


XB8000 をサ ポー 卜 


o 


■CZ-251BS 標準価格 39,800 円 （税別） 

X68000 の 優れた グラフィック HS 境を活 
用 し 効率的に 文鲁を 作成す るた めの 
インテリジェント ヮ一 プロです: アイデア 
プロセッサ 機能 ノ、 ィ パー テキスト 機能 
など を サポート 。データの 整理 ゃプ 
ン テーシ ヨン ツールな ど 幅広い 用途に 
利用で きます 


■CZ-243BS 標準価格 19.800 円 （稅 別) 

プライベートな データ や ビジネス データ 
を 簡単な 操作で 管理 • 運営で きるパ 
一 ソナル データベースです, リフィ J レ、 
タック シール、 ハガキ などへの 印字 も 
0K。 シャープ 電子 手帳との データ 交 
換 可能 (別売の 通 fS ケーブル CE-200 
しが 必要）。 



■CZ-228BS 標準価格 200,000 円 （税別） 
給与 計 » から 明細 発行まで を、 リ 
アル イメージ 入力に より 自動的に， 
素早く 処理す る ことができます。 


■C2-226BS 標準価格 29.800 円 （税別） 
自由な レイアウト 画面で 入力で き 
る ワープロ 槻能を 装備した カード 
型 リレーショナル データべ一 ス。 


■CZ_227BS 標準 ffi 格 200,000 円 （稅 別） 
会計 エキスパートシステムと デー 
タ ベース を 搭載し、 機能と 操作 性 
を 両立 させた 財務 会計 ソフト。 


■CZ-241BS 標準価格 9.800 円 （税別） 


ICZ-242BS 檷準 価格 9.800 円 （税別） 


■CZ-22IHS 標準価格 19.800 円 （税別） 
オリジナリティ あふれる はがき 等、 
簡単に 作成、 印刷で きる ホーム ブ 
ロダク ティ ピリ ティ ツール e ほとんど 
の 処理 を アイコンで 表示し マウス 
で 選ぶ フレンド リー オペレーション。 



： ニ^ 1 



1 IVint Siioi) 


画袍 

'ノ い' し 


■CZ-252MS 標準価格 28.800 円 （稅 別） 
24 トラック 対応 MIDI マルチ レコ一 
ディン グ ソフト Musicstudio PR0- 
68K がバ一 ジョン アップし ました。 
従来の 機能に 加え、 小節 間の コピ 
—及び デリート や、 MIDI インプット 
モニタ一 など、 数々 の 機能 を 追加. 
改良。 さらに 使いやすく なりました。 
ポー ド （CZ-6BM1) が 必要です。 


■CZ-247MS 標準価格 28,8(30 円 （稅 別） 
MID ほォ応 自動 伴奏 槻能を サボ一 
ト、 簡単な 楽譜 入力で MIDI 演奏 
が 楽しめます。 

« MIDI ポ一ド （CZ-6BM 1 ) が 必要です 


■C2-248MS 標準価格 8.800 円 （税別） 

鑑赏 用と 音楽 データ 加工 作成 用 
からなる ライブラリです。 
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開発 ッ— ル 


サウンド ッ. 
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EXE クラブが 待って C 



»X68000 を 手に したら 何 は ともあれ 「EXE クラブ」 へ。 本体 同梱の 入会 申し込み ハガ 
キを 送る だけで 会員証と して、 オリジナル デザインの カード 電卓が もらえち やう （会 黄 無 
料)。 EXE クラブ ニュース や 最新 ソフト、 周辺機器 など X68000 の 最新 
惰報を 随時 ご 案内。 各種 イベント、 フェアへの ご 招待 もあります。 

( r X68000 は 持って いるけ ど、 まだ 入会して ない j 方 も、 ぜひ この « 会 にお 申し込み 下さい。） 

• EXE 会員に は EXE リーダー ズ グッズ • プレゼント も 実施 中です。 
詳しく はお 近くの EXE ショップまで。 

(NEW X68000、 新作 ソフト、 面白 イベント …… \ 
まるごと 見 *体* 験 フェア。 ) 

• 今回の テーマ は ニュ一 X68000。 SUPER-HD/EXPERT II /PRO II の 魅力 を 直 
にご 体験く ださい 。業界 注目の SX- WINDOW も必 体験。 他、 新作 ソフト 体験 コーナ—、 
100 インチ 液晶 プロ ジェ クシ ヨンに よる 大 迫力の ゲームた ちな ど、 新しい 出会いが あるか 
もしれ ません。 X68000 オリジナル グッズ も 展示 即売。 ぜひお 近くの 会場へ お立ち寄り 
ください。 


開催 月 曰 

開催地 区 

開 催 場所 

お問い合わせ TEL 

8/25 出 

1--： n 

ラ オック ス ヒナ タコン ビュー タ館 X68000 フェア 

0262-37-2221 © 

8/25(±) -26(B) 


庄司 デンキ コンビ ュ一 夕 中央 店 X 68000 フ ヱ ァ 

022-224-0559 ◎ 

8/26 旧) 

h fi- 

OA ショップ ァ クソン フェア 

0262-44-3037 © 

8/26 旧) 


松 藤 産業 銀座 通り 本店 X68000 フェア 

096-354-9111 © 

9/8 (±) 

m 島 

力 インド ソフト X68000 フェア 

0886-52-2123 

9/ ほ 出 

東 京 

アイ ビット 電子 X68000 フェア 

0426-45-3001 © 

9/2〗(銜— 23 旧 

広 島 

シャープ グランド フェア' 90 

082-874-2280 © 

9/22(±) -230) 

東 京 

九 十九 電機 7 号 店 X68000 フェア 

03-253-4199 ◎ 


5 印の 会場で 音 S サウンド ライブ を 開催し ます。 


n 会場に は 山 下 章 氏 来場。 


► お 問い合わせ は… シャープ 姊^ 子 機器 事業本部 システム 機器 営業部 

〒545 大阪市 阿倍野 区長 池 町 22 番 22 号 0(06)621- 122U 大代 表） 


これなら 使える! G-ッ —ル 解析 シリーズ一 ③ 
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G= ツール j 新登場 




X68 アーティストの クリエ ィ ティブ マインド を 
刺激す る 新 感覚の グラフィック ツール。 こ 
れ までの エディタ 概念 を一 掃し、 作品に 挑 
む 上で 必要 不可欠な グラフィック 'キャラ ク 
タ '背景 作成の すべて を 備えた トータル グ 
ラフィック ツールです 。ゲーム デザイン を は 
じめ とした オリジナル アートが 驚く ほど 自由 
に 描け ます。 今回 は、 背景 やその キャラクタ 
の 作成 を 目的と した 「日 G EDIT モード」 を 
ご 紹介し ます。 



複数の パターン 同時 作成 : 8X8 ドットの キ 
ャラ クタ を 単位と して 最大 80x80 ドットの キ 
ャラ クタ 作成が 可能です。 
アニメーション 機能 : 作成した キャラクタ を 
動画 チ ヱ ック できる アニメーション 機能 を 
装備。 キャラクタの 効果 を 確認で きます。 ま 
た アニメーションの 間隔 設定 も 可能です。 
精密 描画 も 可能 ： 1 ~ 1 6 倍まで 画面の 大 
きさ を 自由に 変える ことができ、 拡大 画面 
での 細部に わたる 描画が 可能です。 
BAS に 対応 : 強力 な 外部 関数 を 装備。 複 
数の キャラクタ はもち ろん 大きな キャラクタ 
も 扱えます。 


背景 


背景の 作成に は、 「 G = ツール 」 上で 作成 
した キャラクタ を 使用 して 縦 スクロール、 横 
スクロール、 全 画面 スクロールが 可能。 また 
BOX.BOXFILL など 多彩な 編集機能 
が 使えます。 



Z€linSOFT 


株式会社 ザイン 'ソフト 

T676 兵庫県 S 砂 巿米田 町 米 田 1 1 68- 
TE し (079 め 3 卜 7453 


ザインの 彩 先端 

ニュ —コンセプトの NI トキ ヤン バス 「G= ッ— ル」、 登場。 


o 


ノ^- 



U 68000 


o 


れは 


全国 有名 パソコン ショップで お求め 下さ L 

電話 1 本での 通信販売 も 受付 t 、たして おります, 


THE FILE PROFESSOR の实カ 


〇 


ディスクの 八' ック アップ、 ディスクの エディツ 卜、 ディ 
スクの 初期化、 ディスクの 比較、 ディスクの 検査、 ディ 
スクの 情報、 FAT の エディツ 卜、 ファイルの 検索、 デ 
ィレク 卜リの コピー、 ディ レク 卜リの 削除、 ヴ オリユー 
厶 ラベルの 股定、 ディ レク 卜リの 作成、 ディ レク 卜リ桷 
造の 再 読み込み、 ディ レク 卜リ 構造の 印刷、 ディ レク卜 
リ 名の 変更、 ディ レク 卜リ 内容の ソ一 卜、 削除 ファイル 
の 復元、 ファイル 厲 性の 変更、 ファイルの コピー/移動、 
ファイルの 削除、 ファイルの エディツ 卜、 ファイルの 配 
霞惘 報、 フ アイ ゾレ一 覽の 印刷、 ファイル 名の 変更、 ファ 
ィル のソ一 卜、 ファイル 更新 日時の 変更、 ファイルの 表 
示、 ファイルの 奨行、 カレンダ一、 八一 ド ディスクの 直 
掇 エディツ 卜、 システム 情報の 表示、 コマンド シェル、 
現在 時刻の 変更。 


初メ 

心 一 



この ソフ卜 は ロゴス システムの デビュー 作です。 でも、 だか 
ら といって なめて ちらつち や あ 困ります。 私達 は、 いろいろな 
ソフ卜 を 作りました。 その どれ もが 他社から 発売され てい まし 

た。 出来る 事なら ば 自分 達 売したい/その 願いが やっと か 
ない ました。 

□ ゴス システム 

亍 615 京都市 右京 区 西 院上今 田 町 17-1 LSP ビル 4F 
TEL (075) 812-6383 FAX (075) 822-6915 





k^ma ttiii の繊り 広げる 

： ステ リアス アニメーション アドベンチャーな 5 1 弹 ： 


請な ファッション 界を 襲う 奇怪な 連禱 ft 

南米 CD 血に 隠 雄 秘密と は？ 
そして 魅 由 を 待ち受ける 血族の 宿命 は？ 


上 f 
巧 



あだし、 魅 田。 

新 宿に ある デザイン • スタジオの、 新人 A • D (ァ パレ 
ル • デザイナー）。 …… なんだ けど あたしの 持って る 妙な 

「力」 みたい な モノ 人の 心が 判つ ちゃったり、 変に 

カンが 良かったり のせいで、 周りから は 「名探偵 

魅 由」 なんて 呼ばれて、 よ < 相談 事 を 持ち込まれ たりし 
ている。 で、 そんな ある 曰、 友達の モデルが、 突然、' 殺 
されて しまった。 

そして、 あたしの 親友だった 唯 も …… / 

ひょっとして 連続殺人 事件って や ッ c ？! 



X68000 対応 5"-2HD 
き ローランド 社 MT-32'CM-64 完全 対応 
MIDI インターフェイス ボード CZ-6BMI 
又は、 SACOM 製 SX-68M が 必要です。 

(初期の MT-32 では、 正常に 演奏で きません。） 

標準価格 8, 800 円 


システム サ コムで は、 ゲーム ソフトの クリエーター を 募集して しぼす./ 
ゲーム 造りの 喜び 哀しみ を一 緒に 味わって みません か/ 

攀 プロ クラ マ一 や 6BOD0 の アセンブラ や C 言語が 使える 人） • グラフィック （原 
理ゃド ッ卜絵 を 描け る 人） 參ピジ ユア リス 卜 （オープニング デモな どの 桷 成が 出来る 人） 
攀 ゲーム デザイナー （ゲームの^ 画 書 を 作成 出来る 人） 

応募 方法 履歴書と 供に 作品^ (プログラム や ドッ卜 絵， シナリオ 荐） を 当社に お送り 下 
さい。 考の上 面接 曰 を 御 iltS 致します。 資格 ？ 8 校卒 以上 30 ォ 程までの 方。 給 
与 能力 や 6ほ により 優 S 致します。 待 8 昇給 年 1 回， 寅 与 年 s 回、 a 動 手当、 残業 
手当、 各襦 保険 完備。 動務 時間 午前 9 時 一 午後 5 時 30 分。 休 曰 完全 週休 2 日 制、 
年末 年 »、 夏季 休 ほ、 年次 有給 休 K 有。 


38 万 キロの 虚空 CD 

東芝 EMI より 


MT 税込 価格 2.250 円 
CD 税込 価格 ヒ 530 円 


ジェ ミニ ウィング X68000 対 JiS バ リバ 1 J 開発 中./ 


ノヴ エル ウェア シリーズ 

好評 発売中〃 

DOME 

PC-8801SR 
PC- 9801 

各 

9.800P3 

ユー フォリー 

X-1 

6.800R 


工ボ フュージョン 

FM-TOWNS 

9 細 円 

FM-7-77AV 

幽靈君 

MSXP 

6,800 円 

Msxe 

プロ ヴィ テンス 

PC-8B01SR 

7,800 円 

CHATTY 

PC- 國 SR 

8,800 円 

ヴァル ナ 

PC-B801S 闩 

7 脚 円 

ソフ 卜で 

八 ードな 物語 

PC- 誦 

7,800 円 


7,800 円 

メタル サイ 卜 


8.800 円 

FM-TOWNS 

9,800 円 

史上 最強の 
ビデオ バイブル 

FM-TOWNS 

4,800 円 

ソフ 卜で 

八 ードな 物語 2 

PC-9B01 

7,800 円 


7.800 円 

FM-TOWNS 

a, 円 


38 万 キロの 
虚空 

PC-9B01 

各 

9,800 円 


※標準価格に は 消 資税は 含まれて おりません。 

FM-TOWNS 


株式会社 システム サ コム 

〒130 栗 京都 墨 田 区 両国 4- 38-16 

両国 桜 井 ビル 4F 
八 一 ドウ エア 部 03(635)5145 
ソフ卜 ウェア 部 03(635)7609 
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黒衣の 貴公子 




SI68000 

RPG-neXt 

ル- ン ワ-ス 黒衣の 貴公子 

熟い/ X68000 ユーザーの 熱き 要 a に 応え *々8 場 
«t い Z ルー ン ワースと よばれる 異 世界で «り 広げられる 熱さ 寶険 J 攀 

熟い/ ブレイ ヤーの 熟き 魂が 物 II を 自 由 に « り な して ゆ 〈 


• X68OOO 5 2HD 3 枚 IH 

«» グラフ やん ウ 二し （p« 解 《 ク' i >, 

•PC-9SO I VM, UV シ リ一 

5'2HD 3.S 2HD 2 枚 liB *' 


•Pcaao 1 sr シ 



RPG-neXt 
ACT- next 
SLG-neXt 


-… ルー ン ワース 黒衣の 貴公子 

…- 幻 獣 鬼 

-… 遙 かなる オーガスタ 


靈通ほ 85«ニ* 望の 方 は 現金書留て 《 金と 商 品名. 《權 名と SB 

番号 を 明 IS の 上， 当 お ii!K ださい. の: 《は300 円 プラス） 
謂 カタ 口 ク；: 希望の 方 は， 送料と して 切手 200 円 分 を 同封の 上， カタ 

o ク' I 脅 求 # をお 送り <だ さい （* 書ての II* は tsH ゎリ U す） 
き T&E の 最新 情報 かわかる テレフォン サービス 名古屋 (052)776-8500 


企画 *閒 発 • 製遒 売 . 
株式会社 ティー アンド ィー ソフト 

T465 名 古 S 市 名 東 区 豊か' 丘 1810 番地 P ト 




MM 


ヒ 




待望の X-68 対応 発売。 



絲 2 

Dte 雀ソフ 卜の 決定版 登場 I ブレイ すれば する ほど 個性 を もった プレイヤーに 成長す る 
自己 成長 型 サンプリング 機能と、 より 強化され た 推論 型 人工知能の 搭載で 限りなく 
実戦 麻雀に 近づいた。 

リアルな 4 人 囲みと 見やす い 麻雀 牌、 迫力 ある 効果音な どの 採用が 麻雀 ソフ 卜の 金字塔の 
地位 を 不動の ものにする。 


■ 8 月 24 曰 発売 X-68000 騸好胖 発売中 

s 画面 写 貝 は X-68000 版の 開発 画面です 


ーズ 

各 ¥9,800( 税 抜き） 


k «c=±= l^j^j^ .&^y^^tt±^¥<>'U' 通 f 露 当社の 商品 をお 近くの パソコン ショップで お買い求めに なれない 場合、 商品名、 慷 種名、 住所、 氏名、 爾話 番号 を 明記のう え、 下記 住 戸/ 

05KS5Rf*XVntfI ag^ 定価 プラス 3% 消費税 分 を 現金書留に てお 申し込み 下さい。 （送料 無料） 亍 151 東京都^ 谷 区 千 駄ケ谷 2- S-16 ビ クタ一 音楽 産業 株 (通信 販ョ 


強 知能 版 


2 





格に は 消 資稅は 含まれて おりません。 


®AM10: ほ〜 PM7:00 

カード 払い 

i ほ での 御 利用 カー ド 、ッ クモグ 
0 — バルカ 一 ド、 VIP カード、 セン トラ 
| レ、 ジャック ス 'も 御 本人 棵ょ り電 K て 
お申し込み 下さい。 


mmmm pro 矚隱 

九十 九 電機 株 

〒10 卜 91 東京都 千代 田 区 神 田 » 便 局 私書箱 135 号 


★ 商品の ご注文 は 在庫 確認の 上お 願いし ます „ 


全国 代金 引き換え 配達 

お 申 し 込み は 003-251-9911 へ 
お 電話 1 本./ 

配達 日の 指定 もで きます。 


ク レジ ッ卜 払い 

月々 ¥ 3, 000 以上の 均等 払い も 
頭金な し、 夏 •=? "ボーナス 2 回 
払い も 受付 中/ 


現金書留 払い 

〒10卜91 東京都 千代 田 区 神 田 
郵便局 私書箱 135 号 
九十 九 « 機 咮通 fSIS 売 部 oh/Xffi 


ックモ 7 号 店 a03-253-419g"as 荒 弁） 

_ 便利で 安心な 通價 15 壳 
通價 « 麂 8ga03-g51-ggil I 

隱 ニュー センター 店 o 03-25 卜 0987( ほ 当 ■« 地） 
國 ックモ 5 S 店 o 03-251-0531 ほ 当' 川 名） 
鼴 名古靥 1 考店 8052-283-1655(« 当' 吉《) 
■S 古臞 2 S 店 卜 3399( 担当 zf* 山） 
騮ツク モ札幅 S011-E41-Z299(taa «#) 


銀行 振 込 払い 

事前に s てお 届 け 先 を ご iiw 下 さ い。 
* 士 銀行 神 田 支店 (曹) N。. 894047 
九十 九 電機 聰 


各種 リース 払い 

くわし 〈は 各店に お 間い 合せ 
下さし、。 ケースに 合わせて ご 
相 眩に のらせて 頂 きます。 


/ 0120(377)999 

if ^品のお 問い 能 は各麵 細 ©0膽7^ 


毎年 恒例の HSBEI 


9/1(±) 

▼ 

9/9 归: 


アナログ 
ジョイ ス テック 
定価 ¥23 ,800 
ックモ の 曰 特価 

¥f9r900 


48 ドッ トカラ一 
熱 転写 プリ ン ター 
(ケーブル 付） 
定価 ¥99,800 

ックモ の 曰 特価 



40MB 

ハー ド ディ スク 
定価 ¥102, 000 

ックモ の 曰 特価 

¥59^00 


""MIDI サウンド ライブ In ォー タム j 
/5 大好抨 の MIDI ライブショーの 第 2 弹 デス/ 

閽催日 9 月 22 日出 • 23 日 (曰) 午後 3 回 （12:30/1:30/2:30) 
30 分づ つ。 

塌 所 九十 九 電機 姊 7 号 店 1 階 店頭に て、 X68000 と MIDI 楽 
器 を 使った 楽 しい 演奏^ クイズ もあって 景品が 当る Z 
是非お 立ち寄り 下さい。 



AXEBBN-HE 

定価 ¥398, 000 

usiness Matej 標 填 装 fti 
■： イト HD 搭載 
* フリー トップ サイズ 
* 小さい ポ ディに S 性 Rg 

「麵 irtH^I 

3. 5 インチ フロッピ— ディスク ドライ プ 
UE-1F04 定価 ¥4971 

—体 Si 外部 バッチ リ 
UE-1X07 *«V 26.000 

Microsoft EXCEL Ver.2.1 
« 優 ^9 

3^1^ フ 卜 

— *B A X 定価 V6B.0OQ 

竇 IWAX(UE-BZIO) 定価 V49，800 

★ 7 号 店で 取扱って います。 


XB8000 用 メモリー ボード 


1MB 増設 用 メモ 1 J 一 ボード A シぉ^ S 



PROE 


EXPERT n\ 


CZB53C 定価 ¥285, 000 
CZ6B3C 定価 ¥395,000 

* 次世代の インテリ ジ i ンス、 SX- WINDOW 搭載 * 知的 ニュー 
スタンダード フ オル ム * BIOS の 改良 U«t リハイ スピード M を 実 
<ィ トの大 容量 メモリ を 標準 装備 * 拡 ポート 4 ス a 
ト標 : a (R-tffi 

CZB03C 定価 ¥338,000 
CZB13C 定価 ¥448,000 

* 次世代の インテリジェンス、 SX- WINDOW 搭載 * 象 ffl のフォ 
ルム、 マン/ 、ッ タン シ ェ イブ • BIOS の 改良 によ り ハイス ビー ド処 
理を 実現 *3M バイトの 大 容量 メモリ を標 ilMS 備 

czeaac 

定価 ¥498,000 

次世代の インテリ ジ i ンス、 SX-WINDOW»t)£* r チタン j 力 
の クオリティ ブラック *80MB SCS レ、一 ド ディス^ 世 
界標 準 SCSI インタ 一フェース 標準 装備 *BIOS の 改良 (ュ リメ、 


mmoo 


消 * 税 別途、 

¥594 / 


MB 增設 RAM ポ一ド 
MB 增設 RAM ボード 


ックモ 特価 y ダ ジジ 

(消 資^^ 途 ¥1,275) 

ックモ 特価 ¥'72,5 ジジ 

(消 费稅 別途 ¥2, 175) 
2MB と 4MB は全シ リ ーズ 対応。 拡張 ス ロット 用。 


八ード ディスク 

シャープ 

光磁気 ディスク ュニッ 卜 

CZ-6MO! 予約 受付 t( 
SCSI ボード 
CZ-6BS1 予約 受付 q 


アイ テック （カラー： ブラック /グレー) 

IT XB40 定価 ¥158.001^ 

特価 ク, 
IT XB80 定価 ¥198,000 

特価 ヽ mooo 


WW ' 


P X68000 用 


CA セット"） 

CM-32L ¥69,000 

SX-6BM ¥19,800 

MUSlCStUdlO MU-V ¥19,800 
合計 定価 ¥108,600 

ックモ 特価 ジジ 
(消费 抉 別途 ¥2, 754) 
ク レジ ッ卜例 (税込） 

月々 ¥5,830X18 回 払 
★ Musicstudio PRO-68K VI. I 
に は ¥8 , 000 プラスに な ります。 


(B セッ K) 

CM-B4 ¥129.000 

SX-68M ¥19,800 

Muslcstudlo Mu- ト ¥19,800 
合計 定価 ¥168, 600 

ッグモ 特価 ジジジ 

(消費税 別途 ¥4. 320) 
クレジット 例 (税込） 

月々 ¥7.107XM 回 払 
Music PR068K(MIDl) の ソフトの H 合 


おすすめ ソフ卜 


新作 ソフ卜 


Hyper WORD 

定価 ¥39;800L 
SX-WINDOW 

定価 ¥~6- ,800— 
CCompllerPRO-6BK 

Ver S.0 予約 受付 中/ 


Simcity(9 〃発売 予定） 
予約 受付 中/ 
サイ バリ オン 

たン ヤー プ . \ 

I シュ一 ティング ゲーム/ 

予約 受付 中/ 


M モデム S ソフ 


ァ イワ 

PV-A24MNP5 限定 特価 yi7,^?c? 

定価 ¥ 54,800 (消 資锐 別途 ¥894) 



た〜 みのる 2 

定価 ¥17,800 


ッ クモ蹦 J75 ククジ 

(消 * 税 別途 ¥450) 


大 好評 入会者 募集/ 

リ ^ 1 


Software tools 


( GRAPHIC TOOLS ， 

マチ》 バレ ク卜 特価お 7 は 5ジ 
Z s STAFF PRO-B8K 

特価 y 4 ダ タジジ 

サイクロン ExoressaBB 

特価 ぶ 5 ジジ 

デジタル クラフト 特価 y タま r ジク 


電子 手 幅 ソフ卜 


C 

CYBERNOTE PRO-6BK 

特価 V/tf.J^d? 
Stationery PRO-6BK 

特価 V/ ぶ. 5f ク 
め 》« ケ一 ブル CE-300 し 

特価 ト '£*,5 タク 


s ポ ケコン 


PA-8600 特価 V^V,^ ジ 

PA-7500 特価 y/7,f クジ 

PA-6500GY 特価 V 9^00 
陽 fel 

PC-E550 特価 V5T,i ^ク 



国内 • 外で 活躍/ A cd[\ 

使って 便利、 持って て 安心/ ^ 
ックモ グローバル カード は 

ジャック ス • VISA 、セン 

卜 ラル • マスタ一 との 提携 

カードです。 ックモ 各店で 

のお 資 物が らくらく できる 

ラ えに、 国内 はもと より 海 

外での ショッピング も OK/ 

しかも 18 應 以上なら 学生で 

も。 K/ MLd 
冬の ポ一 ナス 一括 払， 金利 手 《 料餹 / 受付 中〃 
お申し込み は (03)251-9898 又は 各店で 


冬の ボ— ナス I 括 払 • 金利 手数料 無/受付 中〃 詳しく はお 闥ぃ 合せ 下さい _ 


※クレジットの 回数 は 1 回〜 60 回、 ボーナス 併用な どあります のでお 電話で お 問合せ 下さい。 


払 
い 

12 



h 口 


' 冬の ボーナス 一括 払い (12 月末) CK〃 
手数料な しです。 絶対、 お得です ゾ。 

翌月 末 払い も 受付け ています (9 月末） 


し 
ま 


★ 下記 セットで お買い上げの 方に は プレゼント〃 t'l MD-2HD 10 枚》 ジョイ 力— ド 2 個 （連射 式 XI シリコン キ —ボード かく- 


末 

OK 
// 

手 

数 
料 
な 
し 


月 

払 
い 
ち 

OK 
// 


利 
用 
下 
さ 
い 


I 店頭に て 、ゲーム ソフト 25%OF ぽ/ (税別）、 超 低金利 ォクト ハッピー クレジット を ご 利用 下さい// 


朗 
報 
で 

の 
ボ 

ナ 
ス 

括 


パソコン プラザ 



案内図 


田から it#5 分 
京 A ；» 田から は * 1 分 至 品", I 



u ，，a'* り rirj I 

店頭 セール 実施 中 


'90 ォクト で 始まる パソコン ワールト 


む 03 - 730-6271 


翁 営業時間 11:00 〜 9:00/ 日曜 祭日 PM7.00 

〒144 東京都 大田区 蒲 田 4-6-7 FAX 03-730-6273 


電話 一本で、 八ィ 即納 


全国 通販 


才クト 

ラ クラ ク クレジット 


シ ヨン 


OCT- 1 システム インフォ メ- 

► 全 商品 保証 付 （メーカー f^p 
-超 低金利 ハッピー クレジット （1|"| 一 60|||1)ぉ(帝 ナミ 
- ボーナス -もリ お、 L 、OK. メ ボーナス 2|i，| お、 t 、OK. グ 

の finL'OK/ ( 万 余な サポート 体制) 

- H'H" i'u'i の 糸 I 〖介せ I' 1 1 1 1 / ^ク トフ リーダ ムシ ス ¥Z 

り, リ itfi デモンストレーション' ぶ 施 中 



2% 

3B 



m 


5。。 

12 回 

5% 

\m 

1\% 


18 回 


翻 


24 回 


30 回 






lool 


OK/ 


才クト 
セレク テッド システム 

広告 掲戟 商品 以外の 
製品 も取极 つてお ります。 


お好みの セット をお 選び 下さい。 15 型 カラ一 ディスプレイ TV 


► SX-WINDOW 搭載。 
MOM バイト ハード テ V スク 搭載 


送料 無料 




'CZ-603C-BK/GY 
定価 ¥338,000 

'CZ-613C-BK/GY 
定価 ¥448 ,000 



現金 特価/ / | 推 選 
お 電話 下さい。 
\ SX-WINDOW 搭載。 

> 拡張 I/O ポ-ト 4 ス n ット 装備 


»CZ-653C-BK/GY 
定価 ¥285,000 

(CZ-663C-BK/GY 
定価 ¥395 ,000 


CZ-605D-GY/BK 
定価 ¥115,000 

5 型 カラー ディスプレイ TV 


CZ-8NJ2 
» インテリジェント コント 口 

定価 V 23. 800 

超 特価 ¥16,800 


きも 


CZ-613D-GY/BK 
定価 ¥ 135, 000 


14 型 カラー テ V スプレー 



CZ-604D-GY/BK 
定価 ¥94， 8000 


21 型 カラー テ 1 イス プレイ 



CU-21HD 
定価 ¥148,000 


CZ-603C + CZ-605D 定価 合計 ¥ 453, 000 ^才 クト大 特価 


B CZ-6I3C + CZ-605D- 


C C2-653C + CZ-605D 定価 合計 ¥ 400 , 000 ► ォ クト大 特価 


D CZ-663C + CZ-605D- 


CZ-603C + CZ-6I3D ' 


CZ-6 1 3C + CZ-6 1 3D 定価 合計 ¥ 583 , 000> 才 クト大 特価 


CZ-653C + CZ-613D 定価 合計 ¥420,000鲥才 クト大 特価 


CZ-663C + CZ-6I3D 定価 合計 ¥ 530,000>ォ クト大 特価 


12 回"！ ？ 「24 回に ？ 「 36 回 に ？ 


48 回 T 


- 定価 合計 ¥ 563,000>ォ クト大 特価 


12 回 


I 


24 回 


？ 


36 回 


48 回 


？ 


12 回 


？ 


24 回 


？ 


36 回 I： ？ に48 回！ ?__ | 


- 定価 合計 ¥ 510,000>ォ クト大 特価 


12回1 ？ [24 回 _C _ L 


36 回 


？ 


48 回 


• 定価 合計 ¥ 473,000^ォ クト大 特価 


12 回 


I— ；"] 24 显」 J _ 一 j:— 3— 6— 回— 


48 回 


？ 


12 回 


~1 24 回 


36 回 | 


48 回 


？ 


12 回 


？ 1—2 4 回 — 


36 回 


48 回 


？ 


120 


？ ] 24 回 [ ？ 「36 回 


48 回 


？ 


CZ-603C + CZ-604D 


- 定価 合計 ¥ 429,800鲥ォ クト大 特価 


I？ 回 [ ¥ 28 ,000 I 24 回 1ニ¥ 14,800 I— 36 回 し ¥ 10, 2 。0」 48 回 | ¥8,000 


02-61 3C + C2-604D • 


12 回 [ ¥36,D00 T24 回 1 
CZ-653C + CZ-604D -'… 


…… 定価 合計 ¥ 542,000>ォ クト大 特価 

19,000 I 36 回 1 ¥ 13,100 | 國 | ¥ 10,200 1 
…… 定価 合計 ¥ 379,800^ォ クト大 特価 


12 回 し ¥25,400 ] 24 回 に ¥ 13,400 「36 回 [ ¥9,300 | 48 回 [ ¥7,200 


CZ-663C-4-CZ-604D 定価 合計 ¥ 489, 800 ► ォ クト大 特価 


12 回 「 ¥ 32,200 ] 24 回 し ¥ 17,000 1—36 回 L ¥ I i ,800」 48 回 I— ¥9,200 


CZ-603C + CU-2IHD- 


- 定価 合計 ¥ 486,000^ ォ クト大 特価 


\_m_L ？ 「24 回 r ？ 


36 回 


？ ]48 回] ？— 


CZ-6I3C + CU-2IHD 定価 合計 ¥ 596, 000 >才 クト大 特価 


12 回つ ？ ― 「24 回 r ？ 


361 


？ 


480 


7 


CZ-653C + CU-2 1 HD 定価 合計 ¥ 433, 000 »>才 クト大 特価 

zm~[ ？ [36 回 に ？ l48ig_ 


12 回 


？ 


？ 


CZ-663C + CU-2IHD- 


- 定価 合計 ¥ 543,000^ォ クト大 特価 


12 回 


24 回 


36 回 


？ 


48 回 


7 


りどん どん TEL しょう。 安 〈なる かも ョズ/ 

り クレジット 価格 は、 消費税 込みです ョ。 ご 利用 下さい. グ 


醒 本体 セット: 送料 無料 參 店頭 デモ 実施 中 …専門の 係員が 詳細に アドバイス 致します。 ぜひ ご 来店 下さい。 

※上記 料金に は、 消費税 は 含まれて おり ません。 消費税が 付加され ますので、 詳し く は、 電話で お 問合せ 下さい。 


PROII-PROII-HD 


Iftw 禾 _C19 RPCJK£137-i 一 


しき T9 ま. に^ 一して .HQ ピ. 3019/: 


s ■ 


I 店頭に て 、ゲーム ソフト 25%OFfT グ （税別)、 超 低金利 ハッピー クレジット を ご 利用く ださい ズ z 

I 特に 人気の ある 商品に よって は、 しばらく お待ち 願う ことがあり ますので ご了承 下さい。 


厳選され た 製品 を、 より 安く、 より 早 《皆様のお 手元に ガ 


広告 掲載 商品 以外の 
製品 も 取扱って おります。 


チャンス/ X68000.SUPER-HD (チタン ) = f^f:^; T g?|S" 送料 ナシ. グ X68000 EXPERT-HD 


SX-WINDOW 搭载。 



* ザ. ワークステーションと 呼.;： に厶、 さわし い 

スーパーな 68000. グ 新登場. グ 

SUPER-HDo 
※プレゼント/ ① MD-2HD10 枚 ® ジョイ カード （連射 式） 
②ァ フタ一バーナー （¥9,200) ④ シリコン キーボード （¥2,800) 

X68000 SUPER-HD 
• CZ-623C-TN+CZ-613D-TN 
定価 合計 ¥ 633,000 …大 特価 .グ TEL 下さい。 

※マウス' トラック ボール 付. グ ディスプレイに は スピーカ 2 個、 チルト 台 付// 


他の テ' イス フレイ'' 1 CZ-602D, 2 61 2D. .3 OZ-603a 
'i CU-2IHD の 組合せ も ございます のて お問い 合せ 


| 12 回 | 

？ 

| 24 国 | 

？ 

| 36 回 | 

？ 

| 48 回 | 

？ 


^安くて ゴメン なさい 。今た' けョ ZZ 


ォク卜 限定 スペシャル セッ卜 


※超 低金利 クレジット ご 利用 下さい。 1 回〜 60 回 払い、 頭金 ナシ/ ボーナス 1 回 払い、 ポ一 ナス 2 回 払い 0KZ 


ォク卜 if 寺 選 シャープ 周辺機器 （送料 ¥U0[]) 


スト チヤ： 

ち^^ 
CZ-6I2C(BK) 
(¥466,000) 
CZ-602D(BK) 
(¥99,800) 
MD-2HD 10 枚 
• ジョイ カード (連射 式 X2 個） 
ォ ク ト超 特価 • シリコン キ- ポ- ト'' カバ- 

¥ 364，000 (送料 消费 税込みめ 

※ディスプレイ = ®CZ-604D ② GZ-605D 
CDCZ-6I3D ④ CU-2IHD 
との 組合せ も ございます。 TEL 下さい。 


• CZ-6BEI 
き CZ-6BEIB 

• CZ-6BE2 

• CZ-6BE<5 

• CZ-6BFI 

• C2-6BGI 
き CZ-6BM I 
き CZ-6BN I 

• CZ-6BPI 

• C2-6BOI 

き CZ-6EB I/BK 

• CZ-6VTI/BK 

• GZ-6B し 2 


旧 M*»t ま RAM ホード (> 

1MB 增設 RAM ポ一 ト' 

2MB 增設 RAM ホード ( » 

4MB 輪 RAM ホ一ド (5| 

增設用 RS-232C ボード …'- [\ 

GP- 旧ポ— ド " 

MIDI ホ一ド ひ 

スキャナ 用 ハラレ ルポ ード 'ひ 
数 filiPf 算フロ セッサ ポ一ド ひ 
ユニバーサル I/O ポー ド' ■' け 

拡張 I/O ポ ックス い 

カラー イメージ 'ユニット '■'■( \ 
し AN ポー ド い 


'特価 ¥ 26,500 
► 特価 ¥21 ,000 
，特価 ¥ 60,500 
'特価 ¥104,800 
'特価 ¥ 38,500 
' 特価 ¥ 45,000 
• 特価 ¥ 20,500 
> 特価 ¥ 22,800 
'特価 ¥ 60,500 
• 特価 ¥ 30.500 
- 特価 ¥ 66.800 
，特価 ¥ 53,000 


8TM? 


i GZ-6TU GY/ 曰 K 

• BF-68PRO 
»SX-68M (システム サ コム） 
»PIO-68BEI-A(l/0 DATA) 

• PIO6BE2-2MCI/0 DATA) 

• PIWBE4-JM(l/0 DMA) 
► CZ-6BVI 


マウス 

マウス トラック ポ一 力 
カラー イメージ スキャナ" 

FAX ポ一ド 

モデム ユニット -…' 
增投 ハードディスク 
RGB システム チューナ一 
ft 性能 CRT7 ィ ルター- 

MIDI ポー ド 

1MB 增設 RAM ポート - 
2MB 增 ポー ド - 
設 RAM ポ―ド ■■ 
ビデオ ボード 〜•■ 


特価 ¥ 5,300 
特価 ¥ 7,500 

大 特価 
特価 ¥60,500 
特価 ¥38,000 

大 特価 
特価 ¥25,000 
特価 ¥15,500 
特価 ¥15,000 
特価 ¥18,500 
特価 ¥37,000 
特価 ¥65,000 
特価 ¥15,800 


ォクト 面白 グッズ 


アイ テック （送料 ¥ I ,000) 

• IT-X640( ¥ 158,000) 

特価 ¥103,000 

• 1T-X680C ¥ 198,000) 

特価 ¥134,000 


モデム コーナ一 （送料、 


► MD- 1 200 A III 特価 ¥1 4,800 

* MD-24FS4 特価 ¥31 ,500 

► MD-24FS5 特価 ¥34，800 

► MD-24FP4 特価 ¥27，900 

► MD-I2FS 特価 ¥15,000 


熱 転写 カラー 漢字 プリンター (r» 


コ 


CZ-8PC4 ¥99,800 

•48 ドット 

サ一 マル ヘッド 
ゼ5〜64まで 
'ハ ガキ 可能 
• カラ一 対応 

ォ クト大 特価^ 6458WT 



CDCZ-8PK 1 0 (24 ピン 漢字 プリ ンタ一 1 36 析） 

定価 ¥97, 800 大 特価 ガ TEL 下さい tt 

(DGZ-8PGI(24 ピン カラー 漢字 プリンター 80 桁) 

定価 ¥130,000 -…… 大特 I//TEL 下さい。 
(DGZ』PG2(24 ピン カラ— 漢字 プリンタ— 136 析） 

定価 ¥160, 000 ……- 大 特価〃 TEL 下さい。 
®10-735X (カラ 一イメージ シ エツ ト） 

定価 ¥248, 000 ……- 大 特価. グ TEL 下さい。 


(D 五段 キャスター 付 

5 段 ス夕 
― キーポート' が 収納で きる 
ft ち、 手元で マウス 操作が 
ラ クラ ク できる 
fflfess の マ; けに 
活用で きる ディスク。 
ウー ン、 こいつ はテ' キル/ 

1325(H) XMO(W) 
x 700(D) 

特価 ¥16,000 


②四段 キャスター 付 ③三段 キャスター 付 


' ま. ' 4 4 段 スタ— 付 



画—， 

― 


どんな パソコン にも 
フレキシブルに 対 £'/ 


1245(H) X6I4(W) 

特価 ¥12,000 


3 段衧 スタ" # 

場所 を 選 はない 
M 易で 使 利な 


1 175(H) X640(W) 

特価 ¥8，800 


平 

成 

2 

年 
名 

の 
ボ 

ナ 
ス 

括 
払 
い 

0K 
// 

12 
月 
末 

手 

数 
料 
ナ 
シ 
// 


低 

金 

利 

ク 

レ 

ジ 
ッ 

卜 

を 

利 
用 
下 
さ 


X68000 ソフト 大 セール 実施 中 ※ゲーム ソフト ォ―ル 25%off 


< グラフ や;/ ク: >«Z's STAFF PR068K Vcr.2.0 
(シャフト） 定価 ¥58, 00 ひ 

ォ外 特価 ¥40,000 

< データ一 ペース > • KAMIKAZE 
(サム シン ググッ ト •） 定価 ¥ 68 , 000 

才クト 特価 ¥46,000 
< グラフィック >«C-TRACE5E 
(キャスト） 定 硒 VS8,000 

ォ クト特 (i¥51,000 

<CSH> • C & Professional Pack 
(マイク 0 ウエア ジャパン） 定価 ¥ 58,000 

才外 特価 ¥44,000 
く グラフィック >» サイ クロン エキスプレス 
定価 ¥78,000 

ォクト 特価 ¥58,000 

<グ ラフィック > 参 デジタル クラフト 
定価 ¥39,800 

才クト 特価 ¥28,000 

< ワープロ >* ハイ バ 一ワード 

定価 ¥33, 800 CZ-25IBS 

才クト 特価 ¥29,800 


型 名 

ffil da 

定 価 

特 価 

CZ-2I ILS 

Ccompier PRO-68K 

¥39,800 

¥28300 

CZ-2I2BS 

BUSINESS PROW 

¥68,000 

¥48,000 

CZ-2I3MS 

MUSIC PR068K 

V 18,800 

¥1 3.500 

CZ-2 1 IMS 

SOUND PRO-68K 


¥1 1 ,500 

CZ-2 1 5MS 

Sampling PRO-6BK 


¥1 2,800 

CZ-2I9SS 

OS9/X68000 

¥29,800 

¥21.000 

CZ-220BS 

DATA PRO-68K 

V 56,000 

¥41 .OOO 

CZ-257CS 

Pnn!^hoo"PR068K.V.2 

" 19,800 

¥14,300 

C2-223CS 

CommunicaKon PRO-6EK 

« 19,800 

¥14,300 

CZ-221LS 

THE 描 袋 VZ.O 

" 9,900 

¥ 7,500 

CZ-226BS 

CARD PR06BK 

» 39,800 

¥21 ,300 

CZ-24IBS 

システム 手 (ft リ フィル 集 

f 9,800 

¥ 7,500 

CZ-242BS 

活用 フォーム 集 

V 9,800 

¥ 7,500 

CZ-244SS 

Homan 68K Ver2.0 

¥ 3,800 

¥ 7,500 

CZ-247MS 

MUSIC PR0-6BKCMIDI) 

¥28,800 

¥20,800 

日 S 

Stalionery PR0-68K 

V li, 800 

¥1 1 ,500 

CZ-243BS 

CYBER NOTE PRO-68K 

V 19,800 

¥1 5,200 

EW 


* 38,000 

¥29.800 

G-68K 


« 14,800 

¥11,400 

E-CS 


¥ 19,800 

¥15,300 


★ ォクト 今月 だけの 新品 限定 販売 (各 l 台 限) (細'.。。。 > 


參 CZ-6IIG(BK) 定価 ¥ 399,800. 
*CZ-652G(BK) 定価 ¥298,000' 
»CZ-662G(BK^ffi¥408,000' 
*GZ-60ID(BK) 定価 ¥119,800' 
攀 CZ-60ID(GY) 定価 ¥119,800' 
*02-6120(0丫)定価¥|19,800. 
• 10-735 定価 ¥ 248,000. 


大 特価 ¥218,000 
大 特価 ¥188,000 
大 特価 ¥248,000 
大 特価 ¥ 68,000 
大 特価 ¥ 68,000 
大 特価 ¥ 74,000 
大 特価 ¥158,000 


店頭 ゲーム ソフト オール 25% off/ ビジネス ソフト 25% より 特価 中 


> 尚 、送料と して 1 ケ ¥500、 2 ケ ¥700、 
3 ケ 以上で ¥ 1 .000 と な リ ます。 


ォクト ラ クラク クレジット 表 


1 回 

1% 

3 回 

2M 

6 國 

3.5% 

10 回 

5% 

12 回 


15 回 


18 回 

9% 


10% 

24 回 

\\% 

30 回 



15.5。。 

48 回 

20% 


★ 通信販売お 申込みの ご 案内 ★ 〒144 東京都 大田区 蒲 田 4-6- 7 TEL: 03-730-6271 

お 屮 込み はお', I ^でお！^ いします。 お客^の く f|; 所〉 く 氏名 X'^fiJT' 卜& びく 商,'"', 名〉 をお 如ら せ ド さい。 * 人^ 確^ 後た だち に ifU'' を ご 送付いた します o 

富士 銀行 三菱 銀行 
久ケ原 支店 蒲 田 支店 
② No. 1824 ⑩ No.0278691 


銀行 振 込： お 近くの 銀行より (t 信 扱い〉 にて 

お 振込み 下さい 
現金書留： 封筒の 中に 住所 • 氏名 • 商品名 を 

ご 記入の 上 当社まで お送り 下さい, 


専用お 申込 用紙 をお 送り 致します 
ので、 必要事 項 を ご 記入、 ご 捺印の 上 
ご 返送 下さい， 手続き は 簡単です 


株式会社 億 人 (ォク 卜） 


※掲載の 価格 は 変動し ますので、 まず は、 お 電話に て ご 確認く ださい。 ※連休のお 知らせ = 8/21( 火）、 22( 水) は 連休です。 

※上記 料金に は、 消費税 は 含まれて おり ません。 消費税が 付加され ますので、 詳し く は 電話で お 問合せ 下さい。 
※銀行 振 込、 または、 現金書留で ご注文の 際に は、 あらかじめ 竃 話で ご 確認の 上、 お申し込み 下さ い。 


視金 一括 払：： 


お 近くの 方 は 
本体 単 品で 

ビジネス ソフト 


回 X6 誦 EXPERT II/II-HD & PROII/PROn_HD & SUPER-HD (送料' 消費税 込) 


X68000 シリーズ 〜PSA スペシャル セット = 限定 誌上 販売 # 


秦本 広告の 掲載の 商品の 価格に ついては、 消 税は 含まれて おりません。 秦 営業時間 = 平日 Aivn0:00 へ PM7:00、 日 祭 AM10:00〜PM6:00 


(平成 2 年 12 月末 支払い を ご禾翻 下さい。） 


モデム （AIWA) 50 台 限定 （送料 ¥1細) 

PV-A24MNP5 (定価 ¥ 54,800) 

• MNP クラス 5 限定 特価 ¥26,500 

•2400bps (送料 づ肖» 稅! Z V 28,325) 


CYBER STICK 

• CZ-8NJ2 
(定価 ¥ 23,800) 

超 特価〃 

¥18,500 (送料' 消 黄 税込み ¥19.570) 


し |\ 


X68000 シリーズ 専用 特価 ¥16,480 

MIDI インターフェース ボード 

SX-68M (サ コム） 

(純 生 コンパチ) 定価 ¥(9, 800 

送料-消: » 税込み, 



ジョイスティック 送料 ¥500 
X1PRO 

定価¥9,500^特価¥7,8ひ 
ASCII STICK 
定価¥6,800^特価¥5,50 



EXPERTII 

セットで お買い上げの 方に、 
* ディスケット 10 枚〕 

* ジョイ カ-ド 2 ケ } ブレゼ ントき 

EXPERTII-HD 

セットで お買い上げの 方に、 

* ディスケット 10 枚， 

ト プレゼント 中. グ 
* ジョイ カード 2 ケ | 


EXPERTII 

(ん' セット ： CZ-603C + CZ-604D 


セ' ン ト 
2 回 


CZ-603C4-CZ-605D 


CZ-603C + CZ-613D 


CZ-603C + CU-21HD 


EXPERTI1-HD 


A セット 

I 12M | 


3' セット 
T21H1 I 


セッ t 


CZ-613C + CZ-604D 


CZ-613C +CZ- 


CZ-613C+-CZ-613D 


CZ-613C + CU-21HD 


■ P&A 恒例 サマー 大 バーゲン 祭 
開催中. グ 

電話に て、 ドン ドンお 問合せ 下さい. グ 
クレジット 表に は、 出せない ほどの 価格です。 
メーカ一 さん、 ご免なさい。 

L —ザ一 の 方に は 大勧迎 されそう です n 
今が チャンスです ノ、 ィ。 


PROII 

セットで お買い上げの 方に、 
攀 ディスケット 10 枚〕 

} プレゼント 中. グ 
搴 ジョイ カード 2 ケ j 

PROII-HD 

セットで お買い上げの 方に、 
攀 ディスケット 10 枚"] 

• ジョイ 力- ド 2 ケブ レゼ ント 中〃 


0 セット 

\m i 


3) セッ 


： 'ノト 


CZ-653C + CZ-604D 


？ 


'- 定価 ¥432.800>tiS 価 


i ' 


_ "定価 V453.000>1W£i 
.000 i 48 回 I 8.500 I 


41 


liifi Y 486. QQO ►'!.') idfi 


？' IN j 


■■St'fffi Y542.80D^1-Miffi 


:-6Q5C 
回 ： 


■Aim Y5G 


遞 
cz-( 


— 1 36 回ェ 


定価 Y379.800^W 価 


24101 ； い 1. 
CZ-613D --… 


Y400.000k- ■ ■■■：. 
1 48iaT 7.6DQ "I 


CZ-653C + CU-21HD 定価 Y «3 . 000 ► -リ ；1：：： 


PRO H- HD 
；) セット ： CZ-663C + CZ-f 


A セ 

(jli 


(c, セット 


, 12 回 1 

に： セ.. 'ト ： にん GfAc-l-CU フ 1HU リヒ価 'に 


\2m 

ト CZ-f 


I ?-4M i 


CZ 6G3C i CZ-013D 


■ 2AM 


SUPER-HD 

セットで お買い上げの 方に、 
* ディスケット 10 枚") 

* ジョイ 力— ド 2 ケ プレゼント 中 ク 


SUPER-HD 

(A〕 セット ： CZ-623TN + CZ-604D - 
： に 回 


厂 24 回 I 

S) セット ： CZ-623TN + CZ-605D 


セット ： CZ-623TN + CZ-613D ■ 


JO . 6()[] 


48E_ 


定価 Y489.800>W 価 


■ m v 


定価 V510.000>«ffi 


定価 ¥530.000>>—^ 価 


定価 Y592.800*"1Wffi 


oi3.oon^ 


ai 格 憲 is 下さい） 

HI 7 I 


偭格は 下さい。） 


コ 


fflfitt はお 電 IS 下さい. 1 


価格 はお 115 下さい》 


fflStt はお 下さい-) 


ffl 格 はお "WIS 下さい > 


S 下さ 《• 
901! 


価格 はお 下れ。 


価格 下さい j 


_?_ 


僅 格 下さい。） 


；下 さい, 

30U 


fta 格 はお « は 下さい. 


価格 はお "mis 下さ t 


60 回 . 


儀 格. 

B0I91 


は 下さ 


僵 ttU^WTF れ 


，せ はお 窗 K 下さい 


m 格 ul^kis 下さ l vi 


«6 格 はお 電 14 下さい 


iOIni 


懾格 U^WBTF さ L 




台数 限定 ■ 送料、 消費税 込み 


EXPERT 


EXPERT-HD 


PRO-HD 


セッ トでぉ ®f 上 け' の 方 に、 

參 ディスケット 10 枚 • ジョイ 力一 ド 2 個 

き CZ-602C + CZ-6 1 2D 定価 ¥ 475 

• CZ-602C + CZ-604D 定価 ¥ 450 

撃 CZ-602C + CZ-605D 定価 ¥ 47 1 

• CZ-602C + CZ-6I3D 定価 ¥ 49 1 

• CZ-602C + CU-2IHD 定{ 面 ¥ 504 

參 CZ-6 1 2C + CZ-6 1 2D 定ィ 面 ¥ 585 

• CZ-6 1 2C + CZ-604D 定価 ¥ 560 

參 GZ-6 1 2C + CZ-605D 定価 ¥ 58 1 

• CZ-6 12C + CZ-61 3D 定ィ面 ¥ 60 1 

• CZ-6I2C + CU-2IHD ^iffi ¥614 

參 GZ-662C + CZ-6 1 2D 定価 ¥ 527 

• CZ-662C + CZ-604D 定価 ¥ 502 

• CZ-662C + CZ-605D 定価 ¥ 523 

• CZ-662C + CZ-6I3D 定ィ面 ¥ 543 

• CZ-662C + CU-2 1 HD 定価 ¥ 556 


プレゼント 中 


800> 特価 ¥306，000 
80O 特価 ¥300,000 
ooo> 特価 ¥320,000 
ooo> 特価 ¥336,000 
ooo^ 特価 ¥338,000 


特価 ¥375,000 
80O 特価 ¥369,000 
ooo ► 特価 ¥386,000 
ooo ► 特価 ¥403,000 
000時 特価 ¥407,000 


800> 特価 ¥339,000 
議^ 特価 ¥333,000 
ooo ► 特価 ¥352,000 
ooo 特価 ¥368,000 
ooo^ 特価 ¥372,000 


PSA 超 低金利 クレジット を ご 利用く ださい # 


周辺機器 コーナ— （送料 ¥1,000) 


(A;C2-8NS! 定 fE\M88.000>^ 価 ¥145,000 

'B CZ-6VTI 定価 Y 69.800>特価¥ 54,000 

c cz-6TU 定価 v 33.t00— 特価 ¥ 25,000 

DJBF-68PRO 定価 ¥ 19.800— 特価 ¥ 1 5,500 

©CZ-6BEI 定価 V 35,000> 特価 ¥ 26,500 

F CZ-6BE1A 定価 V 38.000> 特価 ¥ 28,600 

i©CZ-6BE2 定価 V 79,800> 特価 ¥ 60,000 

H CZ-6BE4 定価 — 特価 ¥107,000 

し CZ-6BFI 定価 Y 49,800>特 価 ¥ 38,200 

(JICZ-6BPI 定価 V 79，800 —特価¥ 61 ,000 

(H0CZ-6BMI 定価 V 26 ,800 ► 特価 ¥ 20,300 

(DCZ-6EBI 定価 V 88.000>特 価 ¥ 67,500 

MAN-S100 定価 V 36,600> 特価 ¥ 28,500 

MCZ-6SD1 定価 V 特価 ¥ 35.000 

0 CZ-8PC3 定価 V 65.800 ^ 

P CZ-8PC4 定価 V 99.800 p &A お 特価 

Q CZ-8PGI 定価 ¥130. 000 \ ，ラ しや 

:JR> CZ-8PG2 定価 ¥ 1 60 . 000 

(SJCZ-8PK10 定価 ¥ 97 . 800 ) 

T)CZ-6Pvt 定価 y 1 9B . 000 ► 特価 ¥1 53,000 

U' IO-735X 定価 V 248 , 000 ト特 価 ¥ 1 90,000 

V CZ-8BSI 定価 V 23. 800 ► 特価 ¥ 1 9,000 

W P!0-6BE1-A(l/0 OATA) | X PIO-6BE2-2M(l/0 DATA) I Y PIO-6BE4-4M(l/0 DATA) 
…… 定 《¥25.0OO>" 特偭 ¥18,200 I …… 定価 ¥50.000> 特価 ¥36,800 I …… 定価 ¥88.000MSffi¥64,8OO 


中古 パソコン は P&A にお まかせ /ノ 


〔振 込 先〕 住友銀行 新 小 岩 支店 
当 No.2639M (株 ピー • アンド' エー 


アフター サ一 ビス 万全 
全 商品 保証 付。 専門の キ旦当 者が お客様の 立場で 対応し ます， 

初期 不良、 輸送 トラ プル etc. 

万が一 初期 不良、 輸送 トラブルが 発生し ました 際に は、 即 交換 させて いただきます, 



★ 頭金な し/ ★ 即日 発送 


価格 は 流通 事情に より 変動 致します ので、 銀行 振 込 • 書留 等の 送付 前に、 あらかじめお 電話に て ご 確認 下さ L 


特価 セール 


£ 寄り 下さい。 専門 係員が 説明いた します。 

面で 受付し ます。 詳しく は 電話に てお 問合せ 下さい。 

面の 20% 引き OK/ TEL ください。 

X68000 用 ソフ ト コーナ一 （送料 1 ケ ~ 5 ケ まで ¥ 500) X68000 用 





、一ド ディスク （送料 ¥1,000) 


超 低金利 クレジット 率 


ほす (祭日の 場合 は 翌日になります） 


回 数 


6 

10 

12 

18 

24 

36 

48 


72 

84 

手数料 


1 S 

5.0 

S 0 

sn 

111 -っ 

14 S 

19(1 

24.5 

V0 

1R 5 


株式 仝 や I： ピ一' アンド' エー 

〒124 東京都 葛 飾 区 新 小 岩 2 丁目 1 番地 19 号 日 祭: A | 

ほ 03-651-0148 (代) 


営業時間 

平日： AM10:00〜PM7:00 
日 祭： AM，0:00〜PM6:00 

代) 03-651-0141 


中古 ノく ソコン 


送料 ¥2, 000 


► X-68000 セット ► ¥21 0,000 *CZ'856C' 

»X-68000ACE セット ".）¥240,000 »CZ-870C" 

► X:l ターボ Z セット ■ ■■■ ► ¥100,000 *CZ.881C'' 

► X-1G/30 セット ►¥ 39,000 *CZ.820D'' 

► CZ-822C ►¥ 1 5,000 •CU14GB' 

► CZ-830C ►¥ 25,000 »CU14BD 


► ¥45,000 «CU14AG2 > ¥30,000 

卡 ¥55,000 »CU-14H2 ► ¥30,000 
> ¥65,000 翁 CZ8PC2 ' - ► ¥25,000 

) ¥10,000 • CZ-8PK6 ► ¥32,000 
>¥ 5,000 
) ¥25,000 


通信販売お 申し込みの ご 案 内 


〔現金 一括で お申し込みの 方〕 

• 商品名お よび お客様の 住所' 氏名 • 電話番号 を ご 記入の 上、 代金 を 当社まで、 現金 
書留で お送りく ださい。 (プリンタ 一フロッピ一 の 場合、 本体 使用 機種 名 を 明記の こと） 
〔銀行 振 込で お申し込みの 方〕 

き 銀行 振 込 ご 希望の 方 は 必ずお 振込みの 前にお 電話に て お客様の ご 住所 • お 名前- 
商品名 等 をお 知らせく ださい。 
(電信 扱いで お 振込み 下さい。） 
〔クレジットで お申し込みの 方〕 
• 電話に てお 申し込みく ださい。 クレジット 申し込み 用紙 をお 送りいた します ので、 ご 記入 
の 上、 当社まで お送りく ださい。 

• 現金 特別 価格で クレジットが 利用で きます。 残金の みに 金利が かかります。 
参 1 回 —84 回 払いまで 出来ます。 但し、 1 回のお 支払い 額 は ¥ 1000 円 以上。 


その 場で 高価 現金 買 取り • 高価 下取り OK. グ 
園まず はお 電話 下さい。 画 下取り '買 取りで お急ぎの 方、 直接 当社に 来店、 また 

03-651-1884 FAX: 03-65 卜 (H 41 は、 宅急便に てお 送り 下さい。 

秦 下取りの 場合 価格 は 常に 変動して いますので 査定 額 をお 電話で 確認して 下さい。 

(差額 は、 P&A 超 低金利 クレジット を ご 利用 下さい J 

参 頁 取りの 場合 現品が 着き 次第、 2 日 以内に 買 取り 金額 を 連絡し、 振込み、 又は 嘗留 

でお 送り 致します。 

き 近 SB の 方 は、 P&A 本店 まて、 直接お 持ち 下さい。 即金に て、 ¥ 1,000,000 までお 支払い 致します。 


II 


《便利な 超 低金利 クレジット を ご 利用 下さい》 

參月々 ¥1,000 円から OK. く/ * ボーナス 払い OK (夏 冬 10 回まで OK) 
攀 支払い 回数 1 回〜 84 回 • お支払い は、 8 ヶ月 先 力、 ら でも OK. グ 


超 
特 
価 
で 
ク 
レ 

ジ 
ッ 

が 
組 
め 


雨 口 

徒歩 1 分 


> 定休日/毎週 水曜日 = 第 3 水曜 • 木曜 は 連休と させて いただき 



> 現金 If 留 及び 银行振 込で お申し込みの 方 は、 上記 商品の 料金に 3% 加算の 上て 'お申し込み 下さい。 詳しく は、 お 電話で お問い 合せ 下さい, 


プ リ ンタ一 (ケ一 ブル • 用 紙 付） 限定 5 合 新品 （送料 ¥ 1 ,000) 


アイテム 

• HXD-040(40MB/23ms) 定価 ¥118，000> 特価 ¥ 88,000 

• HXD-042( 増設 用） 定価 ¥128,00O 特価 ¥ 95,000 

アイ テック 

• ITX-640(40MB/28ms) 定価 ¥158，000 — 特価 ¥1 01 ，000 

• ITX-680(80MB/20ms) 定価 ¥198,000ト 特価 ¥1 31 ,000 

に Z>8PC3( カラー 漢字 24 ドット 熱 転写 プリンタ一） 

定価 ¥65,800 特価 ¥39,800 

に Z~8PK8(24 ピン 漢字 プリンター 136 桁） 

定価 ¥ 1 52,000 特価 ¥69,000 

► CZ-8PC4 P&A 特選// (カラ一; 莫 字 48 ドット 熱 車 云 写 プリンタ一） 

定価 ¥99,800 特価 TE し 下さい 

)MD-24FS5( オムロン) 定価 ¥ 49,800>特価¥ 34,800 

'MD-24FS7( オムロン） 定価 ¥ 64,800> 特価 ¥ 45,000 

>コ ムスター 2424/4 (NEC) 定価 ¥ 38,800> 特価 ¥ 28,000 

) コム スター 2424/5 (NEC) 定価 ¥ 44,800> 特価 ¥ 32,000 


P & A 特選 パソコン ラック （送料 無料） 移動 自由 (キャスター 付） 


モデム コーナー （送料 ¥1,000) 


®3 段 
875(H) 


'ill 

' f ¥9,000 


X 580(D) 
X610(W) 



:'® 4 段 is^© 5 段 

J 1320(H) PL 1280(H) 
X 600(D) Ms^ -'l X600(D) 
X630(W) B£..i X620(W) 


J> >¥1 2,000, 


'¥15,000 


ooo«* 1 細 ¥ 
B00«* 特価 ¥ 

800"* 特価 ¥ 

80。4 特価 ¥ 

800— W 価 ¥ 

000#特 価 ¥ 

000— PfltA 特価 

800 蜂 TEL 下さい ノ 

800«*W 価 ¥ 

800— 価 TEL 下さい。 

oo [^特価 ¥ 

8004 特価 ¥ 

800 蜂 PflrA W 価 T£L 下さい。 
800 岭 特価 ¥ 
BOO 蜂 P&Mi* 価 TEL 下さい, 
800 ゆ 特価 ¥ 
8004pfiiAl* 価 

し 下さい 。 

ooo 啼特価 V 

ooo«M5 価 ¥ 
ooo 蜂 特価 ¥ 
叩 04 特価 ¥ 

800-» 特価 ¥ 

特価 ¥ 


2's STAFF PRO68K Vcr2 .0(' ン J* イト） 

2 s TRIPHONY デジ タ ■» レクラ フト （'ノア イト） 

テラ ッッォ （'、ミン グ'、 '一ド ） 

KAMIKAZE (サム シン グ- グッド） 

EW&EI (イースト） 

C&Prufussional Pack (マイク ロウ a: アジ ヤノ ヾン） 

Final Vor3.2(a: — エス ビー） 

DATA PR068K CZZ20BS 

CARD PR068K C2226BS 

C compiler PR068K CZ2I ILS 

OS-9/X68000 CZ2I9SS 

AI-6SK C2234LS 

THETHRV2.0 CZ224LS 

SOUND PR068K 

MUStC PRO68K CZ2 1 3WS 

Sampling PR068K CZ2ISMS 

MUS1C-3lud>0 PR068K 237MS 

MUSIC-PR068K CM1DI] 247MS 

NoAi-pnrtt Shop 221HS 

Communication ？ Z3C5 

C-TRACE68 Ver.3 .0( キャスト) 

サイクロン EXPRESS ひ 68 

G6BK Ver? PRO 

THE FILE PROFESSOR (ロゴ システム） 

G'y — ■/ レ （ザイン ソフト） 

た 一み のる 2(SPS) 

マジック ノ 《 レット （ミュー ジカ ノレ プラン） 

Hypor word CZ-25IBS 

* ゲーム ソフト 20%OFF OK// (—部 ソフト 除 O 


g 前 通 = 


1>R 新 小 岩 


:. 一：、： パ "7- - ^ ^ ^ ： -. 一： ■;: ■ 二め わ： q q ； . 

リリ (ノ V メ〜 -パ ヤノ "ん ：7 7 リ〜" ^W5S55^S-^^S 
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2D GRAPHICS 練讓 






高 品位 グラデーションの 例 。65536 色 を フルに 使え 
ば この 程度の 表現力 は 当然。 内部 処理 は 24 ビット 
な ので 非常に 滑らかな 変化と なって いる。 


画像 取り込みした 自然 画に ランダム フラクタル 処 

理を かけて みたところ。 軽く かける と 絵画 W の 表 

現と なる。 




下 描き を スキャナで 読み込み， 点 列 エディタ を 使 
つて 上から なぞって いく。 そうして^ら かな 画像 
デー タ が 手軽 に 作れ るよう になる。 


グラデーションで 描いた 絵をラ 
ン ダム フラ クタ ル 処理で 加工 し 
たもの。 雲の ような 自然な 模棣 
がで きも。 同じ 系 例の フラ クタ 
ル でも， フラクタル のかけ 方 を 
だんだん 強く していく と， 絵 も 
どんどん 違う 形に 変化す る。 特 
殊 効果と しても 面白い。 





カラー イメージ スキャナ （WD- 05HS) での 取 り 
込み 例。 なお， アダプタ は一 部 手直しが 必要。 
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/J#i#AY Graphic Gallery 


DSGA'CG アニメーション 講 





mtMi 

今月 は 皆さんからの ご 要望に お応えして 画像 を大 
映しで 載せて みま した。 これで 細かい ところの 処理 
や， 全体 的な バランスな どが よ く わかる と 思います。 

D5GA の 連載 も 1 年 を 過ぎ， 皆さん も 基礎的な 
こと は把提 できた と 思います ので， 今月 はちよ つ 
と 高度な 技術 を 紹介して みま した。 


画像 2 逸く も はっきり， くつき り， ゎぁキ 'レ' ィ 
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SOFTWARE 




提督の 決断 

光栄の 新作 は 太平洋戦争が 題材の シミュレーション。 マルチ シ 画| 
ナ リ ォ 方式 を 取り 入れて いる。 歴史の 勉強が できち やい そう。 



今月 は 著さの せいか ゲームの ほう もちよつ 
とひと 休みって カンジ かな。 とりあえず， 
今回 は 先月 号で 間 に 合わ な かった ゲーム を 
中心に 紹介して いきます。 てな ことで， 今 
月 も ヨロ シク！ 



あ〜， 寒い 寒い。 なんで こんなに クーラ 
一が ききす ぎる ほどきい てんだ ろ， この 建 
物 は。 おか i f で 外 と の 温度 差 が や た ら 激し 
くって カゼ ひいち やった じ やない の， もう。 
確かに 新しい から きれい はきれ いなんだ け 
どね， この ビル。 

さて， 今月 は スペースが 少ない ぞー！ 
全部 紹介し きれる かな あ。 それじゃ， スぺ 
—スも 少ない こ とだし， ぐ だぐ だいって な 
いで， さっさと 進めて いきましょう 力'。 夏 
休み も 残り 少ない し …… ね （だって 宿題 全 
部 終わった 人って 少な いんじゃない？ そ 
ろ そろ 焦ろう ね）。 

ト ッ プバッ ター はお 馴染み 光栄の シミュ 
レー シ ョ ン ゲーム 提督の 決断。 これ は 太平 
洋 戦争 を 題材に した もので， プレイヤ 一は 
日本軍 か 連合国 軍の どちら か を 選択し， 太 


平洋の 利権 を 巡って ドン パチ する わけです。 
当然 シ ミュレ ーシ ョ ン ゲーム だから 頭 を 使 
う。 どんな 作戦 を 立てる 力' が， この ゲーム 
の 攻略の ポィ ン ト 。 友達 と 2 人で も 遊べ る 
の もうれ しいです ね。 これ はすで に 発売中。 
来月 号で 詳しく やる つもりです。 さて， キ 
ミ な ら どんな 決断 を 下す ？ 

2 番手 は T&E の ルー ン ワース。 この ゲー 
ムも すでに 発売され ている ので， もう プレ 
ィ した 人 もい る はず。 プレイヤーの 行動に 
よって エンデ ィ ングが 変わる マルチ エンデ 
ィ ング 方式 を 採用 し た RPG。 こ れか らじゎ 
じ わと 人気 を 集めて きそう。 これ も 来月 号 
で 詳しく やります。 楽しみに してて。 

そ れ では ザィ ン ソフト の バル 一 サの復 響。 
この ゲーム ももう すぐ 発売され る 予定。 阖 
面 を 見る とザィ ン ら しさが よ く 伝わって き 
ますね。 この ゲーム は トリ トーン' フ アイ 
ナルの 続編です。 

さあさあ， 以前から みんなの 興味 を ひい 
ていた システム サ コムの 闍の 血族， これ も 
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泰若 自然， ポビュ ラス I 

I ポビュ ラス （前回 順位） I 

2 ダン ジョン マスター 

4 f 

3 グラナダ 

2 i 

4 天下 統一 

5 f 

5 ク オース 

—初 

6 ギャラ ガ' 88 

一 初 

7 スーパー ハング オン 

6 1 

8 ソ一 サリ アン 


9 ト ン ネル ズ& ト ロールズ 

一 初 

IQ ワンダラー ズ' フロム' ィ一ス 

3 i 

相変わらず ポピュ ラスが トップです。 2 位ダ 

ンジョ ン マスターの 票の 2 .83 倍と い 

うからお 話 

にならない。 来月から プロ ミストラ 

ン ドの票 も 

入って きたら どうな つてし まう の やら。 

しかし， ポピュ ラス を 僅差で 追つ 

ている ソフ 


卜が I 本 だけ あり ます。 それ は "SX- WINDOW" 
だつ ！ 「安い」 「へタ な ゲームより 楽しめる」 
「遅い （ ？ ）」 な どな どの 声が 聞かれ ま す。 ほかに 


ゲーム 以外で は C コ ン パイ ラ， Z'sSTAFF PRO-68 
K の 票 も 多いです ね。 

5, 6 位 は そろって ゲームセンターからの 移 
植が初 登場。 ク オース は ゲームセンターで ハマ 
つていた 人の ハガキ が 多い のが 特徴で， 対戦が 
楽しみと いう 声 も。 対して ギャラ ガ' 88 は グラフ 
イツ ク がいい， 手軽に 楽しめる という ことです 
から， ゴ テゴテ せずに シュ一 ティングの 王道 を 
ゆく 姿勢が， 好 印象 を 与えた という ことで しょ 
う 力、。 

トンネル ズ&ト □ —ルズ は， 豊富な テキスト 
と 数多くの イベントが 飽きさせな いという 声で 
9 位に ランク イン。 しかし 上 は 強豪 ぞ ろいで ッ 
ライ かな。 

ところで， ソ一 サリ アンが ランク アップして 
るけ ど， 二の ハガキ の 大半に r ランクから 落ち 
そうだから」 て 害いて ある ぞ。 う一 む。 おそる 
べき パワー。 今後 は ィ一ス が 落ちそう だから， 
ファンの みんな 頑張って ハガキ を 送って く れた 
まえい。 （浦） 



j m . 

ノ ■ 八鵪 
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あた し W、 life にぶつ かる KB かい 力'. のお （をおば ろげ K 
» じて、 效 く H を UH いた。 

u か 光の 抑 の屮 に 、 が i タ かんで るみた い な 


； I /— ンヮ 

マル チェン ディ ング 

方式 採用の RPG。 も 
ち ろん それ 以外 (： 
ッ ドエ ン ディ ングも 
あるけ どね。 口の 悪 
、勇者って いうの も 
珍しい。 思わず 笑つ 
ちゃい ます。 操作 性 
は なかなか GOOD。 と 
つっき やすい ゲーム 
といえる でし よ う。 

とうとう " 1 " が 発売され ま した。 超能力 
を 待つ 少女 魅 由が， 殺人事件 を 解決して い 
く アドベンチャー。 取り込み 画像 を 駆使し 
た オープニング や ビ ジュ アル シーン は圧卷 
も のです。 エンデ ィ ングが 終わ ると， 9 月 
に 発売され る 予定の 完結編の 予告 まで 入つ 
ていたり して， なんとなく トクした 気分に 
なれます ョ。 

新規 参入 会社 日本 ソフ テックから は PIN 
BA しし *PINBA しし 力 ? 発売 される 予定。 タイ 
ト ルを 見ての と お り ピン ボール ゲームです。 
サンプル 版 を 見る 限りで は なかなかよ くで 
きている ようす。 期待し ま しょう。 

で， ダン ジョン マスターが いまだ 好評 を 
得て い るビ クタ 一音 楽 産業 か ら は， 雀 ま 2 
が 発売され る 予定。 推論 型 人工知能 を 搭載 
した こと で 麻雀 ファンの 間で 人気 だつ た 力 f , 
今回の パー ジョン アップで ますます その 傾 
向に 拍車が かかりそう。 なんた つて 今回 は 
「強 知能 版」。 一層 本格的な 麻雀が 楽 しめる 
とあって は， 麻雀 ファンで なくても 舆味 
津々 てと ころでしょう。 8 月 中に 発売の 予 
定 です。 

先月 号で も 紹介した ワールド コート。 い 
よいよ SPS から 発売され ました。 この ゲ一 
ム， 最初 は なかなか タイ ミン グを 合わせる 
のが 難し いんだけ ど， 慣れて くると エース 
が 決まった りして 壮快 そのもの。 サン プリ 
ングで スコア を 喋って く れ るの もなん とな 
〈うれしい し。 この ゲーム は 要 2 メガです。 

で， 新規 参入の ポニーテール ソフトで は， 
パズル ゲーム ユニオン が 快調 に 開発され て 
いる もよう。 画面 上に ある 同じ 牌と 牌 を 合 



PINBALL-PINBALL 


体させる こ とに よって ク リアで きる とい 
つた パズル ゲーム。 いつも 同じ 牌 を 見 るん 
じ や 飽きち やうから， 牌の 種類 は フルーツ， 
動物， 英字， 昆虫な どと いろいろ 用意され 
ています。 すべて マウスで 操作で きる の も 

X68000 用ら し く ていいで すね。 

さてと， 発売 はま だ 先 だけれ ど 着々 と 進 

行して いる 2 つの ゲームの 画面 を 紹介し ま 

す。 まず は システム サ コムの ジェ ミニ ウイ 
ング。 そろそろ 遊べる ものが できて きまし 

た。 上がりが 楽しみで すね。 そ して M.N.M. 


— 咕 


雀 豪 2 

Software のぺ ルセ ウスの 冒険。 これ は横ス 
クロール タイプの RPG。 もう 少ししたら 詳 
し く お伝えで き そうです。 

その ほ 力 > ウルフ. チームで は X68000 専用 
仕様の アクション ゲーム ァク シス を 開発 中 
だし， ヘルツで は， アクション ゲーム ダイ 
ナ マイト デューク を 移植 開発 中 だし， 遊擎 
王 II は も う じき 発売され そうだし。 

なに は ともあれ 活気の ある ゲーム 界。 来 
月 はいった い. どんな ゲームが 出て く る やら。 
それじゃ， また 来月 をお 楽しみに。 

11+ 颺 
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ぺ ルセ ウスの 冒険 
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►TUNNELS S TROLLS 



テーブル トークの 

興奮 を XI でも！ 


Mizuno Kazuo 

水 野 一雄 


かの 有名 な テ 一 ブル ト 一 ク RPG r TUN 
NELS&TROLLS」 が' ノ 《ソコ ンゲ一 ムィ匕 さ 
れ， X1 および XS8000 版で も 発売され まし 
た。 特に XI ユーザーの 方々 に は 興味 津々 か 
も しれない けど， お 気に 召 し ま すかな …… ？ 



X68000 用 5"2HD 版 3 枚 組 9, B00 円 (税別） 
XI /turbo 用 5' で D 版 12 枚 組 9, 800 円 (税別） 
スター クラ フ卜 003(9 昍 )29BB 


ついに， 「TUNNELS&TROLLS」 （以下 
T&T) が 出ました。 テーブルトークで プ 
レイ していた 私 はすつ ごく 嬉しい。 X68000 
は ディ スク 3 枚 組です が， XI ではなん と 12 
枚 組です （超 大作 ともい えます 力 ? ， いやな 
予感が する でしよ）。 それで は， さっそくい 
つてみ ま しょう。 


'-ー ブル トーク 1 rsjj 


皆さん， テーブルトーク は ご存じで しょ 
う 力'。 簡単に いうと， 数人で 対話 をし なが 

ら 進めて いく RPG です。 映画 「E.T.」 の最 
初で 子供た ち が ピザ を 注文 し な が ら 遊んで 
いたのが そうです （あれ は D&D, ちなみ 
に， あの 「ウイザード リイ j は D&D のダ 
ン ジョンでの 冒険 を 簡略 化し ゲームに した 
もの。 知って た ？）。 

さて 「T&T」 です が， これ は 本格的で 
ありながら， システム や ルール はす ごく 簡 
単 （柔軟性が ある） なんです。 ほかの RPG 
はちゃん と した ハ°ッ ケージに ルールブック 
な どが 入って いる ものが 多い のに 対して， 
こ れは 必要 最低限の ルールが 書かれた 文庫 
本 1 冊 （消費 稅実施 前に 680 円 だつ た） で 出 
ています。 そして 「T&T」 に は， ソ ロア 
ド ベンチャーなる ものが あります。 これ は 
いわゆる ゲーム ブックで， 「T&T」 の 世界 
(もちろん， ドラゴン 大陸が 舞台） を ひと 
りで も 遊ぶ ことができます。 これ も， 簡単 
な システムの 恩 患と いえる かも しれません 
ね。 興味の ある 方 はやって みると よいで し 
よ ラ。 


パソ ：] ン ゲーム 「TSTj\ 


この ゲームが どんな もの か， システム， 
キャラクタ， アイテムに 分けて 紹介して い 
きましょう。' 

まず は ゲームの システム について です 力 f， 
ウル ティ マ 型の 本格的 ロール プレイ ングゲ 
ーム です （これ は 見れば わかる 力'）。 あつ， 
ウル ティ マ 型って 知っています 力'。 これ は 
ゲームの 世界 （マップ） を 上から 見下ろす 

タ ィ プの RPG の 総称です （対す る ものに ゥ 
ィザー ドリ ィ 型が あり， これ は 3D ダン ジ 
ヨン タイプの ものです 力、 両方と もす でに 
死語？）。 単に 上から 見下ろし ていても 芸が 
ない ので， この ゲームで は アドベンチャー 
フィールド （マップ） を 斜め 上方から 見下 
ろす という 方法 をと つてい ます。 初めのう 
ち は 違和感が あ り ます 力 5 ， 惯れる と 結構 見 
やすい と 思います。 

パーティ の 移動 方法 も テーブルトークら 
しくな つていて， 「普通に 歩く」 「探索し な 
がら 歩く」 「走る」 r 登る」 など， いろいろ 


とあります。 探索して いれば 罠に 掛かりに 
く く ， 些細な ことに も 気づく 確率が 増 し ま 
す 力 *, やっぱり それなりに 時間 を 消費し ま 
す。 走って いれば 速 〈移動で きます が， 危 
険 にあい やす く ステータス も 回復し ない と 
いう ことになる ので， TPO に応 じ て 使い 分 
けが 必要です。 

戦闘 は タク ティ カルコ ンバッ ト 方式です。 
戦闘 時の メニューに は， r Auto Fightj 
「Manual Fightj 「Run」 「Controlj が あ 
り， 「Auto」 は 個々 の キャラクタが 手に して 
いる 武器で 自動 戦闘し ます。 絶対 勝てる 相 
手の ときに は 便利で しょう。 「Manual」 は 
個々 の キャラクタの 動作 を 決定で きます。 
戦闞は 敵, 味方の 区別な く 敏捷 性 (SPD 値） 

の 高い キャラクタから 順に 行動し ます。 
動作 中の メニューに は 「攻撃す る」 「魔法 

を 使う」 「アイテム を 使う」 「飛び道具 を 使 
う j 「体当たり する」 「防御す る」 が ありま 
す。 ここで 面白 いのは 「体当たり する」 で 
しょう。 これ は 文字 どおり 相手に 体当たり 
をして， うまくいけば 相手 を ふつ 飛ばした 
り 気絶 させた りで きます。 ま た 注意す る 点 
として， 「防御す る」 以外 は 味方の 位置 も考 
えない と， 味方に も 影響を及ぼして しまう 
という こと （仲間 を攻搫 した り ， 魔法で 眠 
ら せたり してし まう） があります。 「Run」 
は 皆さんお 馴染みの" 逃げ" です。 そして， 

「Control」 は メッセ 一 ジの 表示 速度の 変更 
など。 ここ は XI と X68000 で 少し 異なって 

「アニメーションの オン， オフ」 なんて X 
68000 ら しい もの もあります。 



装備 を 身に つける と 画面 上の 姿 も 変わる 
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ところで， この ゲームで は 時間の 概念が 
あり， ゲーム 進行と 密接に 関係して きます。 

こ の 世界で は 1 年 は 12 力 月 で 四季が あ り ， 
1 週 は 7 日 と 我々 の 世界と あま り 変わり あ 
りません。 日付， 曜日に よって 生活が 変化 
する ので， プレイヤーの 対応 次第で は 冒険 
に 有利 に な つ た り 不利 になったり します 
(具体的に は 食料の 値段が 月に よ り 変化す 
る な ど）。 時間 は 1 日 24 時間です。 時間 は 商 
店の 営業時間， ステータスの 回復な どに IMI 
係して きます。 


キャラクタ について、 


やはり RPG なので， 定番の キャラクタ メ 
ィ キングが あります。 しかし， 「T&Tj で 
は NPC (ノン' プレイヤー 'キャラクタ） 
という ものが あり， すでに シナリオ 中に キ 
ャラ クタが 用意され ている ので， それ を 使 
つて プレイす る こと もで きます。 でも， 自 
分の 分身 （PC:. プレイヤー 'キャラクタ） 
だし， ゲーム 中で 役に立つ とき も あるか も 
しれない ので， 作成して おいて 損 はないで 
しょう。 

キャラクタ は 4 人まで 作成で きます。 作 
成で き る 種族 は Human, Elf, Dwarf, Hobbit 
の 男女の 8 種類， 職業 は Warrior, Rogue, 
Wizard の 3 種類です。 また， キャラクタの 
容姿 （グラ フ イツ クで 表示 さ れ る 。 Elf の 女 
性 はいいが， Dwarf の 女性 は …… ） も 選択で 
きます。 X68000 ではき れいです が， XI で 
はこん な もの かなと いう 程度です （まあ， 
そんなに 重要 じ やない けどね）。 

ところで， テーブルトーク 「T&T」 で 
は 種族に フェア リ ーゃヮ 一ウルフな どの モ 
ン スター を 選択す る こと もで きる し， 職業 
に も 魔法 戦士が あ りました。 これら はゲー 
ム バランス を 崩し かねないので 実現され な 
かった のでし よ う。 僧侶 は 「T&T」 では 
扱いません。 治療の 呪文 も 魔術師が H 昌 え ま 
すから。 ちなみに 盗賊 も ある 程度までの 魔 
法 を 唱えられます。 

キャラクタの ステータスに は ST (体力 
度)， IQ (知性 度)， LK (幸運 度)， CON (耐 
久 度)， DEX (器用 度)， CHR (魅力 度)， 
SPD (速度）， ADD (戦闘 修正） が あ り ま 
す。 ADD 以外 はお 馴染みで しょう。 ADD は 
ほかの ステータスよ り 導き出される 戦 |州 時 
の ボーナス 点です。 

キャラクタ 作成 時の 解説 はこの 辺に して 
おいて ゲーム 中の' ことに 話 を 移します。 ゲ 
ーム 中に キャラクタ を 呼び出す と， ステー 
タスの ほかに AGE (年齢）， Level (レべ 
ル）， Hits Taken (防御 点）， FOOD (ft 
料）， GP (金 货）， SP (銀 货）， CP (銅 
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言語 を 教えて くれる 人が いた， 誰が 習おう か 

m, 健) t 状態が 表示され ます。 「t&t」 

では 货幣が 3 種類 あり， 1GP = 10SP=100 
CP となって います。 健康状態 は 8 段階 あ 
り， XI では 文字， X68000 ではち よ つと し 
た グラフィックで 表示され ます。 また， 作 
成 時に 選択した 容姿 も 表示され ます。 X 
68000 では 装備 を 変える と これが 変化し ま 
す （XI の 人， 残念でした）。 「T&T」 に は 
豊富な 言語が あ り ま す。 誰 も が 話せ る 共通 
語の ほか， エルフ 語， ドワーフ 語， ホビッ 
ト語， 古代語 (モンスターの 話す 言語)， 獣 
語 （動物の 話す 言語） など 十数 語 あり， い 
ろい ろな 言語 を 習得す る こ とに より 話せる 
相手が 増え， 冒険に 幅 を 持たせて く れ ます。 

冒険す るに は パーティ を 組ま なければ な 
りません。 パー ティ は 4 人 編成で PC, NPC 
の 混在が 可能な ので， 必要 に応 じ て 入れ 換 
える ことができます （入れ換えた キャラ ク 
タはそ の 場で ずつ と侍槻 している）。 

最後に アイテム について です 力 f ， 「T& 
T」 の 特徴 は 武器の 豊富 さ にもあります。 
短剣， 直刀， 曲 刀， こん 榉， 斧， 弓， 槍な 
ど の 武器が すべて 数 種類ず つ 揃つ ています。 
これ だけ ある と 攻撃力の 问じ ものが あるの 
で， 「 こ の 武器 は 嫌いだが 攻繋 力が あ るから 
しょう がな い」 などと いう こと がな く ， 自 
分の 好みで 選ぶ こ と がで きます。 


蒙： やつ r みこ' 


テーブルトーク 「T&Tj の プレイヤー 
から 見て も かな り いい 出来で はない かと 思 



これが 戦 M 画面 だ！ バ シバシ 

います。 テーブルトークと は 異なって いる 
ところが かなりあります 力 それ はしかた 
ない といって 通り過ぎる こ とがで きる 程度 
の もの だと 思います。 

X 68000 版で は （編集 室で 8 時間 程度 遊ん 
でみ ただけ です が)， これと いって 不満 は あ 
りませんでした。 ディスク 交換 も 起動時に 
1 回の みだし， ハードディスクに インスト 
ール して 遊ぶ こ ともで きます。 

XI 版 は （たぶん） 初代で も 走る だろ う か 
ら そ れ だけで もす ごい。 でも， 不満 も あり 
ます。 ディスク 12 枚と いう 大作で あるから， 
(怒濤の） ディスク 交換 は 避けられな いと 
しても， 1 戦闕 にっき 4 回 （のべ 6 枚） は 
飮迎 できません。 プレイ 時間よりも デ イス 
ク 交換， アクセスに かかる 時間の ほうが は 
るかに 長い 気がします。 これで は 感情移入 
もへ つた くれ もあった も ん では あ り ま せん。 
もう 少し どう に かな ら なかつ たので しょう 
か。 あと， Xlturbo なのに グラフィックに 
漢字 を 書いて いるではありません 力'。 パッ 
ケージに ある 「400 ラ ィ ン モニタ， 漢字 ROM 
が 必要」 と は， どこで 活かされて いるので 
しょう 力'。 また， 両 機種と も マウス を 使用 
できます 力 ? ， アイコン 間が 離れて いる こと 
も あり， 移動 量が 大きくて 使 いづら いとこ 
ろが あります （マウス を 使い慣れ ていない 
せいか も しれない が）。 この辺 も 考慮に 入れ 
て もらって， 次回 「クォーター スタッフ」 
に 期待したい と 思います （移植され るかな 
あ …… XI に）。 


感想 

かなり 忠実に ゲーム 化されて いますので， テ 

—ブル トークの 「T&T」 を 知らない 人で も， 
棼囲気 を 味わえる と 思います。 だから， 細かい 

こ と をい つても しかたな いと 思います のでい わ 
ない ことにします。 

また， X 1 でも 走る こと は 大いに 称 » すべき こ 
とだと 思います。 XI ユーザーの 皆さん， 怒 溝の 

ディスク 交換に 負けず 頑張って く ださい。 

X68000 版 


(最高 * 10 個） 

X1 /turbo 版 


シナリオ 



シナリオ 

X68000 と 同じ 

グラフ ィ ック 


******* 

BGM 

同 左 

BGM 


氺 * # * * 

ゲーム パランス 

〇 

ゲーム バランス 



「丁 & 丁」 らし さ 

かなり 良い 

「丁 &T」 らし さ 



ディスク 閱係 

涙ち よちよ 切れ 

ゅ& 口' 



あ &、 口 

ディスク さえ 我慢 すれば ◎ 
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やっぱり キャラクタ なの だ 


OFTOUCH 


O- Again 



キャラクタ は 
世界 をつ くる 


Komura ^atoshi 

古村 聡 


一部に 熱狂 的 ファン を 持って いる ブロン ゥ 

イン。 その ブロン ウィンが 活躍す る 「第 4 
の ユニット j シリーズ も， はや 第 5 弾。 こ 
れで第 1 部 「WWWF」 編が 完結ら しいけ 
ど， どこまで 続 くんだろう …… 。 



う 一ん， う 一ん， 感動した ぞぉ。 やれば 
感動す るぞ おと 思いながら， やり 終わって 
やっぱり 感動す るって いうの は 作れ そ うで 
なかなか 作れる もん じゃあありません。 と 
いう わけで， 第 4 の ユニット シリーズ 第 5 
弾 "D-Again" の 登場な のです。 いや， こ 
の シリーズ は シナリオと 演出が 本当にい 
い ！ と， いつもながら 感心して しまい ま 
す。 前 作の 第 4 の ュニッ ト 4 "Zew" では 
ほとんど 詩の ような 囲み （本人 は 詩なん か 
書いた 覚え はな いんだが …… でも あれって 
本当 は 2 ページ 見開きが でき る く らい 分量 
が あつたん だよ） を 書いて しまい， いまで 
は OWX の 吟遊詩人 と まで 呼ばれる ように 
なって しまった 私な のであります 力 ? ， そう 
やつ て 道 を 踏み外す 奴が 出て くるく らい シ 
ナ リ ォ& 演出が とて も よ いのです。 

なんで こんなに シナリ 才 も 演出 もよ く 出 
来て いるの か？ それ はこの ゲームが キヤ 
ラ クタ を 大事に している からなん です よね。 
登場して くる キャラクタ を あたかも そこに 
本人が い るよう に， 細か く 細か く 心理描写 
をして いく， そして キャラクタが ひとりで 
に 話 を 作って いってし ま うので はない かと 
いう く らい キャラクタが 感情 豊かに なって 
い く '…- • という；： とです。 

前 作 "Zer0" では ブロン ウィンの キャラ 
ク タ がか なり 形と なって 出来て き たんです 
よね。 そして， 今回 はもう ひとりの 少女の 
物語な のです。 


X68000 用 5' で HD 版 4 枚 組 B.800 円 (税別） 
データ ウェス 卜 S0B(9B8)123B 


あらすじ など- …'- 

話 は 前 作 "Zer0" の エンデ ィ ング から。 
ブロン ウイ ンは 統合 軍の 特務 査察 官に 任官 
さ れ たのです。 そして 2 週 問の 研修の 後， 
彼女 は 局長から 特務 機構 長官 護衛の 指令 を 
受けます。 命令 を 遂行すべく パリへ と 向か 
う ブロ ン ウィン。 

しかし， パリに 着いたら 着いた で， もう 
バニ ッ ク， 結構 前途 多難な ブロン ウィン だ 

つたり する のです。 ま一， いっしょに 
仕事 をす る S クラス エージ ェン トのォ 
一 ジスって いう 男が とんでもない 奴。 
3 度の 飯より 飯が 好き， 酒 は 昼間から 
かつく らう， ブロン ウィン を 抱き 力' か 
えて 地下鉄に 乗り込む わ， 挙げ句の 果 
てに 自分の こと を 愛情 を 込めて "ォー 
ジ一" つて 呼んでくれ だって （ …… わ 
し， こいつ 嫌い！）。 本当に 任務が 遂行 
でき るの かなあって 感じな のです。 

ジュネーブまでの 特務 長官の 護衛の 
途中， 列車の 中で ブロン ウィンと とも 


に 護衛の 任に ついた ォ一 ジスが 話しかけて 
きます。 

「さて， 問題です j 

「なによ」 

「次の ヒン ト に 当てはま る 人 は 誰で し よ 
ラ ？ 

1. 目 は 猫 目で 赤い 瞳 をして います。 

2. 髮の 毛の 色 は 青です。 

3. その 髮型は ポニーテールです j 
「ダル ジ ィ！? j 

「さつ き ホームに いた ぜ」 

ダル ジィ が この 列車に 乗って いるの か ？ 
WWWF は 崩壊し， もはや 機能して いない 
は ずで は なかった の か。 ダル ジ ィ は 何の 目 
的で この 列車に 乗って いるの か？ はたし 
て ダル ジ ィの 逆襲 は あるの か？ WWWF 
は 本当に 崩壊した のか？ そして ブロン ゥ 
ィ ンの 前に 立ち ふさがる 新たな 敵と は 
…… ？ ブロン ウィンの 運命 は …… ！ 

そう， やっぱり 今回の ストーリ 一は 第 2 
話での 登場 以来ず つ と ブロン ウィンと 戦い 
続けて きた， 永遠の ラ イノ り レ， ダル ジィの 
お 話な のです。 

第 4 のュニ ッ ト 4 "Zere" では ブロ ン ゥ 
ィ ンに 人格が 出来て きて ひと りで 歩き 始め 
た， という こと を 見せた 話 だつ たのて すが, 
考えて みると やっぱり， ブロン ウィンと い 
う キャラクタが 出来上がつ ていく うえで 
いちばん 影響 を 受けた （お 互いに） のが こ 
の ダル ジィ なんです よね。 永遠の ライバル， 
ダル ジィ。 ブロン ウィン を 光と すれば 彼女 
は 影と いえる かもしれ ません。 しかし， 光 
と 影 は 表裏一体。 ブロン ウィンと いう キヤ 
ラ クタと 同じように， ダル ジィも かなり キ 
ャラ クタが 出来上がって きたんです。 その 
証拠に 今回 じつは ダル ジィ はこん な 台詞 を 
言 うんです。 

「後悔 など ある もの 力'。 後悔な ど …… j 

こ れカ ？ ク ライ マツ クスの 感動へ とつな 力！ 
つてい く ん です。 前 作の エンデ ィ ン グでブ 
ロン ウィンが 見せた あの 笑顔。 そして， 今 



Qioscmc ていん 
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の 人に 仕 ま-を 頼まれち や う の だ 
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回 見られる ダル ジィの さまざま な 表情。 ブ 
ロン ウィンが 「優し さ」 という 言葉で 表せ 
られ ると すれば， ダル ジィの それ は 「強さ」 
なのです が， あの 台詞が 彼女の ガラスの よ 
うな 硬く， しかし もろい 強さな のです。 

ま， とにかく ストーリ 一は 皆さん 自身で 
じっくりと この ゲーム を やって みるの がい 
ちばんで しょうね。 ぜひ， この 感動の スト 
ーリ 一 を 味わって く ださい。 


システム につし )Z ― 

あんまり ス トー リーの 話ば つかり しても 
しかたがな いので （下手す り ゃネタ ばら し 
になって しまい かねないし， それた' け は 絶 
対したくない …… ） ゲームの システムの 話 
をし ましょう。 とはいっても， 善 ちゃんと， 

「あ， PCM で サンプリング やって るね」 
「そ 一な の 一」 

「だって， これ ハンド クラップ じ やん」 
「そ一 なんだ 一 」 （「あ 一く しゅ j のじえ 

だか， おまえ はつ！ あれ も 面白かった け 

どね） 

と いう 間抜けな 会話が 成立して し まう くら 
い， 音楽に も グラフィック にも センスの な 
い 私 だから してたい した こ とはいえ な いん 
だけどね。 

画面 写真 を 見る とわ かるでしょう けど， 
こ の "D- Again" は 画面 レイ ァゥ ト， プル 
ダウン メニュー など ゲー ムの システム 自体 
は "Zew" そっくり なのです。 

別に それ 自体 は 間違いで はない と 思 うん 
です よね。 だって， この システム 自体と て 
もよ く 出来て るし， この ゲーム を 買う 入の 
中の かなりの 人が "Zena" を 買って るで し 
ようから みんな が 違和感 なく ゲーム を 進め 
るに はもつ とも いい 方式 だと 思 うんです よ 
ね。 それに 演出 的に も 4 で ブロン ウィンの 
心理描写， 5 で ダル ジ ィ の 心理描写 … … と 
同じような こと を やり たいので あれば とて 
!> い い 方法 だ と 思 う ん です よね。 私 はこれ 
でよ いと 思います。 

ただ， 唯一 残念だった のが， あの 第 1 話 
(第 4 の ュニッ 卜） から 採用され 続けて きた 




なんじ' 


二 いつは 


ようし 


"デフォルメ キャラ 戦闘 モ 一 ド "（勝手に 名 
付けて しまった 力 -: ， 2 頭 身の キャラクタが 
ちょこ ま か 動いて 戦う 戦闘 モー ド のこ と） 
がな くな つてし まつ たのです よね。 戦闘 モ 
一 ド 自体が な くな つてし まつ たわけで はな 
くて， 2 頭 身 キャラが ちょこ まか 觔く のが 
なくなって， 代わりに メッセージに ダメー 
ジの数 fit が 表示 さ れ るよう になつ たんです 
け ど ね。 

う一 む， ？ « かに あ の 戦 岡 モー ド は 作 る の 
が 面倒 だ という こと はとても よく わか るん 
だけど， でも あれって とっても かわいくて 
楽しかった のにな 一 （ちなみに 私 は 第 1 話 
の戦關 場面 を 見て プロレス ゲーム かと 思つ 
た ことがある。 なつかしい 思い出 だ …"- )。 
それに 相手の ダメージが 数字で 出る と 敵の 
弱点が すぐ わかつ ちゃって 面白く な いんで 
すよ ね 一 。 次回 作で はどう-にかして くださ 
いね。 データ ウェス ト様。 


跳べ! アニメーション 効果 


飛行機の 中で たたずむ ブロン ウイ 


さてさて， 今回の システムの 最大の 特徴。 
今回の システムと 前 mi の と で 決定的に 違う 
の は ゲーム 中に アニメーションが ある， と 
いう こと なのです。 

"D- Again" は FM TOWNS では X 68000 
よ り 2 力 月 ほど 先に 出て いるんで す 力 f ，「第 
4 の ュニッ トは 今度から アニメーションが 
ある。 あの ブロン ウィンが 画面の 中で 動き 
回る」 という 話 を 聞いて， いても たっても 
いられな く な り 本当に ブロン ウイ ンを心 か 
ら 愛して いるの なら TOWNS を 買う しか 
ない ！ でも， そんな 金 はない し 一… 。 ん 
が, だがし かし， だ 力 5 し 力' し。 はっきりい 
つて それ はいらん 心配でした。 
r よ， よくも！ ぶち 殺して くれる つ！」 
化け もんが ガバっ と 迫って く る ！ 
ぱっ と 跳ね る ブロン ウィンた ち ！ 
そ して スパッ と 切れる 服 ！ 
ちゃ 一ん と， 飛び かかる， 跳ねる， 切れ 
ると いった ァ クシ ョ ン 表現が パ リ パ リにァ 
二 メーシ ヨンして るんで す。 いや 一， ちゃ 
んと 動く じ やないです 力、 はつ はつ はつ。 



ふうに， 二 いつだつて 戦える。 だけど' 


すごいです よお。 躍動 感 いっぱい。 それ も 
クライマックスでの ぐいぐいと 引き込む よ 
うな ス トー リーの 流れと あいまって 完璧と 
いえる 演出。 言葉で なんか とても 表現で き 
ません。 

これ だけの 技術 を ぜんぜん ゥリ にす るで 
*» な く （TOWNS 版の 広告 に はあり まし た 
力 f , X 68000 版で は パッケージに すら 書いて 
な いんです よ， ちょっと 心配し ちゃった） 
惜 しげ もな く， しかも 効果的 に 使って しま 
う。 展開 も スピーディに 感じさせて くる。 
完璧， これ 以上 何 を 求めようかと いう 演出 
です。 いやはや 感勳の アニメーション なの 
です。 はつ はつ はつ。 

今回の "D- Again" で 5 作 | になる 第 4 
の ユニットな のて • す カ气 コ レー クタ —ズァ 

ィ テムと いえる ァ ド ベンチャー ゲームの 代 
表 作と いっても， もう 誰も 異論 を 唱 える 人 
はいないでしょう （いても 聞かない ふり を 
する もん）。 ついに データ ウェス 卜さん も 

「この データ ウェス ト ある 限り この シリ一 
ズ はずつ と 作り 続ける！」 と 宣言して しま 
つた く ら いのす ごい 力の 入れよ う なのです 

(うむう む， よい ことじ や）。 ぜひとも デー 
タ ウェスト さんに はがんば つて これから も 
第 4 の ュニッ ト シ リ ーズを 作って いって ほ 
しいです ね。 


思い入れ 


-ジ では ブロン ウイ ンは » を 結わえ 
ている （注： 日本 髮 のこと ではない。 束ねて 
るって いう のかな ？ ） の だけ ど， なぜか ゲー 
ム 中には 出て こない。 う一 ん， か あいい な一。 
か あいい な 一。 か あいい な一。 ぜひ ゲームの 
本 編の 場面で も あの 絵 ほしかった な一。 あと， 
最近 遊びの 部分が ち よつ と 少な くな つち やつ 

た 気がす るんで すけ ど あっても いいん じ 

やないで すか， もう 少し。 ま， でもい ぃゲー 
ム です。 どんどん この M 子で いって ほしいな 
(し 力、 し， WWWF の 最後が， シ ョ ッ カーの あと 
に は ゲル ショッカーって パターンと はねえ 


一… )。 
評価 

大変よ くで きました 
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待ちに 待って たシ ムシ ティーが いよいよ x 

6B000 に 登場。 ポピュ ラスで は神サ マだった 
ポクた ち は， 今度 はもう ちょっと 身近な 市 
長さん に 早変わり。 さてさて， それで は メガ 
口 ポリスで も 目指す とする か。 


東京に は 首都 高 という 一般 道から 隔離 さ 
れた， くねくね 曲がる わ， 重なる わ， 間違え 
る と どこへ 連れて行かれる かわからない わ 
の 芸術的な 道路が ある。 ビルの 谷間 やら 川 
の 上 やら 堀の 中 やら， トツ ピーな ところ を 
走ったり して 面白い こと は 面白い の だが， 
実によ く 渋滞す る。 車の流れよ り 芸術 性 を 
重視した 設計 をした せいな の だが， だか ら 
といって 一般 道 を 走る と， これ また 信号が 
いっぱいあって， 歩行者が たくさんいて， 
いろんな ところで 工事 を やって いて， 不法 
駐車が た 〈さんあって， 警察 は 不法 駐車 を 
たくさん 取り締まって， 車の 数 を 減らした 
いの だが あんまり やりすぎ ると 「経済大国 
日本」 を 支えて いる 自動車 産業が 怒って し 
まう ので 実行で きないで いて， 首都 高 以上 
に 時間が かかった りする。 

しかしで ある。 この 前， 私 は 「そ一 だよ 
な， どこが どう 渋滞す るかなん て， ど 一ろ 
作る ときには わかんな いもんな」 なんて， 
道路つ く つてる 役人に 同情して しまったの 
だ， 不覚に も。 それ もこれ も， この シ ムシ 
ティーが いけない ので ある。 私はシ ムシ テ 
ィー やって ると き は 市長で も， 普段 はなけ 
なしの 収入から ひい ひいい いながら， 所得 
税ゃ 住民税 や 国民健康保険 料 や ら 国民年金 
を 支払つ ている ビン ボーで 善良な 市民な の 
だ。 官僚 や 政治家の 無策 を 許 して はいけ な 
いの だ。 それに， シ ムシ ティーの 市長 はッ 
ィ ン タワーの 庁舎の 高い と ころに 広い スぺ 
—ス なんて 持って いないの である。 せい ぜ 
い， 猫の額の 6 畳 間 だ。 

究極の 箱庭 ゲームで ある こと ― 

シム シティ 一は 都市 シ ミュレ ーシ ヨンゲ 
ーム である。 ポピュ ラス や A 列車で 行 こ う 
と 同じく リアルタイム' シミュレーション 
ゲームで ある。 私 は 吉田幸 一氏の 呼称が 気 
に 入って いるので 「箱庭 型 ゲーム （0WX5 月 


号 P40 参照）」 と 呼んで しまおう。 「箱庭 療 
法」 を 英語で サン ド プレイ （SAND PLAY) 
というので， サンド プレイ ゲーム， つてな 
わけ だ。 ロール プレイン グ ゲーム だって 心 
理 療法の 一種で ある 役割 演技 （ロール. プ 
レ ィ ング） からき ている の だか ら ，サンド' プ 
レイ ゲームが あつたって， い 一 じ やない 力'。 

さて， リアルタイムで ポピュ ラス や A 列 
車 を 思い起こ すよ う な ゲームで あるから し 
て， 箱庭の 中で ポコ ポコと 人が 増えたり 生 
活 したりす るの を 見て 楽しむ ので ある。 ポ 
コポコ と 人を增 やすに は， 住みよ い 都市 を 
作らねば ならない。 そのために は マウス を 
使って 何もない 土地 を 区画整理す る 。 

各 区画 は 原則と して 3X3 の マスカ { 1 単位 
であり， 居住地 区， 商業地区， 工業地区の 
3 つが 基本で ある。 さらに 警察と 消防署 も 
都市に は 必要た'。 

都市が 発展す るに は 遠距離の 交通， 交易 
のた めの 拠点 も 必要で， 港と 飛行場 を 置く 
ことができる。 飛行場 は 大きい ので 5X5 マ 
ス である。 ついでに 娯楽 も 必要 だとい うこ 
とで， 古代 ローマの ように スタヂ アム も 建 
設 する （造らない と， 住民が 要求す る）。 

それでもって， 交通網の 整備 も 忘れて は 
ならない。 道路と 鉄道の 敷設が 可能 だ。 駅 
を 作る 必要 はない。 A 列車の よ う に 列車 事 
故が 起き る こと もない。 

居住地 区， 商業地区， 工業地区の 3 つに 
ついては， プレイヤ 一は 区画整理 する だけ 
で， 建物 を 建てる の は 市民の 仕事で ある。 
区画 を 作れば 人が 集ま る， なんて こと はな 
くて， 治安の 悪い ところに 人 は 住まない し， 
職場の ない と ころに 人 は 住ま ない の だ。 

操作 はすべ て マウス。 ウィンドウば しば 
し。 Musicstudio や Mu-1 のように 1024 X 
512 の 画面 を 使って いて， 画面から はみ出る 
分に ついてはす いすい スクロール する。 ダ 
ン ジョン マスタ一 や ポピュ ラスの よ う に， 


実に アメリカン なのが ポ イン 卜 だ 


糊,^ 


用 5"2HD 版 9，800 円 (税別） 
イマ ジニァ 003(3 ぬ) 8911 



シ ムシ ティーに は 農地がない。 なぜなら， 西 
欧の 「都市と 農村 を 区別した 都市 論」 の 上に 成 
り 立って いるから だ。 日本で は 昔から 都市と 縻 
村なん ていう 区別 は あまりなくて， 今でも 都市 
の 中に ポ ッンと 小 さ な 農地が あ つたり する が， 
ァメ リ 力での 農業 はでつ かい 田園 地区に どば つ 
と 土地 を 持って やる のが 基本 だから だ。 で， シ 
ムシ ティ一 に は 農地 はない ので ある。 食い物 は 
ど一 して るんだろう， と 思う の だ 力、'， きっと， 
工場で つく つてい るの だろう。 

スタヂ アムで はァメ リ カン フッ トポール を や 
つてい る。 これ も アメリカン だ。 サッカーなら 
ばョ 一口 ビアン， 相摟 ならば ジャパニーズ， 口 

—ラース ケ一 ト を やって いれば ジャ 二一 ズだ ！ 
ちなみに. スタヂ アムで は 49ers (フ才 一ティ一 


ナイ ナー ズ， などと いうう つとう しい 読み方 を 
する） が Bears に 7 —10 で 負けて いる。 

居住 区 は 突如 と し て 教会に 化け る ことがある。 
二れ も アメリカン だ。 なぜなら， 日本 だったら， 
「人々 が 自分で 寺 を 作る より， 政府が 勝手に 作 
るの が 近代の 基本」 だからで ある。 異論 は ある 
だろう けど， いいや。 

さらに， 警察から ほんのち よ つと 離れる と 「治 
安が 悪くなる」 の も アメリカン である。 さらに， 
治安が 最悪の マン シ ョ ン でも 人が 住んで いた り 
すると 二ろ もァメ リ カンで ある。 

それに， 電気が エネルギーの 基本， つての も 
アメリカン かもしれ ない。 まあ， なんにもない 
土地に ポコン と 都市 を 作って しまう ところ も， 
入植の 歴史 を 持つ ァメ リ カンな ところ だな。 
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「なぜか 狭い 画面」 を 味わう こと はない わ 
けで ある。 以上， ゲームの 説明 終わり。 

なお， コンピュータが ジ エネ レー ト した 
土地に 都市 を 作って 楽しむ モードと， 状況 
設定され た シナリオ の 上で 都市 復興 や 再建 
を 目指す シナリ ォ モー ドが あるんだ けれど， 
私の 趣味の 問題で シナリオ モード はやん な 
かった ので 了承して ね。 

都市 開発の 苦労と 喜び 

1900 年。 最初 は 何もない。 空き地と 森林 
と 川 （あるいは 湖） が ある だけで ある。 プ 
レイヤー は その マップが 気に入ったら， お 
もむ ろに ボン， と 発電所 を 建てる。 発電所 
に は 火力と 原子力が あって， 火力発電所 は 
港の 近くに つてな こと はない （そんなの は 
燃料 を 外国に 頼って いる 日本 だけ 力'）。 それ 
から， 原子力発電所 だと メルトダウン する 
ことがある らし い。 力 ? ， 私 は と り あえず 「災 
害な し」 モ一 ドで 遊んで い る ので 関係ない。 
1900 年に 原発？ なんて 野暮な こと はい わ 
ないよう に。 

で， 居住 区をぺ 口 つと 決める。 食う 寝る 
と ころに 住む と ころがな いと 話に ならない。 
でもって， 発電所から 送電線 を 引っ張る。 
続いて， 職 住 接近で も 離れ てても いいが ェ 
業 地区 やら 商業地区 やら を 指定す る。 うま 
< い く と バラ ックが 高層 マンション になつ 
た り ， 西 友が 有 楽 町 マ リオンに なったり す 
る。 恍惚の 瞬間 だ。 そして， 道路 やら 線路 
やらで 結んで いけば 街が できて いく わけ。 

この 時点で 重要な のが， どんな 都市 を 作 
りたい のかと いう コンセプト。 歴史が 語る 
とおり 水 を 中心に 考える シティ。 ョ一 ロッ 
パ 風に 放射 状の 街 （もっとも， 道路 は 縦 か 
横な ので， きれいな "すべての 道 は ローマ 
に 通じる" は 作れない）。 平安京 や 長 安の よ 
う な 碁盤 目の 者 15。 

ひとつ， 歴史が 与える 教訓 を 記して おこ 
う。 それ は， ブラジルの 首都" ブラジリア'' 
と オース ト ラ リ ァの 首都 "キャンベラ" だ。 
この 2 つの， 山 か 森 か 知らない けれど 何も 
ない ところ を 切り開いて 作つ た 人工的な 者 |S。 
結局， 人々 は 整然とした 近代 都市より， そ 
の 郊外に 建てた バラ ックに 好んで 住みつ い 
たという。 日本で も 幕 張 あたりが そういつ 
た ハイテク タウンの グロテスク さ を かも し 
出して いるよう だ。 親しみ を 感じない 都市 
つて， いらない よね。 

とりあえず 考える の は， 工業地区 は 治安 
が 悪く なりやすく， 空気 も 悪く なりやすい 
ので， 居住 区との 距離 を 考える ことと 力'， 
商業地区 は 人が 集ま ると ころに 作る と 力'， 
水辺に 近く て 環境の 良い と ころに 人 は 住み 



怪獣が 通 つた あと は 火事になる 


たがる という ことく らいた'。 

公園 も 作れる が， まとまった 広さの 公園 
を でんと （セン トラ ノレ パークみ たいに） 作 
る 力'， 居住 区の 中に 小さな の をち よこち よ 
こ 作る か （高 輪 3 丁目 児童 公園み たいに） 
は 好きずき だ。 
なんて， 書く と， 楽みたい だけど， 実は 

"災害な し" モードで 成長 を 「う ふうふ」 
としてい るからで あって， ノーマル モード 
に するとた ちまち 「えらい こっち や」 なの 
である。 シ ムシ ティー を 走らせた ま ま， 「鈑 
でも 食って くる 力'」 しょうものなら， 火事 
で 都市 1/3 くらい が 丸焼け， ケチ つて 消防署 
を 作らなかった ぱ かりに， 燃え広がる 一方， 
仕方ない から 火の まわ り を 破壊して 延焼 を 
食い止める， なんて 羽目に 陥る の だ。 

ひと 通り， でかい 都市 を 楽しんだら， 災 
害 ON で やって みよ う と 思って いるので， 

「軟弱 ものめ！」 と 責めない でおくれ。 

ちなみに， 任意の 災害 を 起こす こと もで 
きる。 飽きたら， 火災 や 洪水， 飛行機 事故 
か ら 竜巻， 怪獣 ま で 好 きな 災害 を 起こそう 

(これ は ポピュ ラス か ？）。 

市民の 気持ちの 汲み取り 方 

当たり前 だが， 都市 を 大きく する にはコ 
ッが ある。 たとえば， 治安と 力'， 大気汚染 
と 力'， 道路と か だ。 道路が 多い と 車が 増え， 
酸性雨が 降ったり して 大気 は 汚染され る。 

治安 をよ くす るに は 警察 を 作り 建物 は密 

総評 

何もい うこと は ある ま い。 1 " われわれ は 箱庭 療 
法的な 表現 を， 実は 日常生活の 中で も 欲して い 
たんじ やなかろう か （中 村 雄 ニ郎） 」 という こと 
かもしれ ないし， すぐに 都市計画 とか 都市 論 を 
ぶち 上げたがる 計画 好きの せいか も しれない。 

アート デ インクに も チャンス はあった のに， A 

列車の あと， a 列車 n なんて 作って しまった。 シ 
ムシ ティーの 方向へ 進めば よかった のに， と ® 
う。 そうすれば ジャパニーズな 箱庭 都市 ゲーム 
で 遊べた の だ。 ポピュ ラスと いい シム シティ一 

といい， さすが 西欧 人 は 「モデル ィ匕 j がう まい!!！ 
という と 二ろ かも しれない。 



評価 表 は 市民の 不満の パロ メータ。 お 一 こわ 


集 させない ように。 大気汚染に は 公 II や 鉄 
道 （鉄道 は 大気 を 汚染し ない） を 増やす。 

収入 は 税金な ので， 人が 減る と 困る し， 
無駄 使い すると 都市の 維持に 困 る 。 

"評価" コマンド を 見て みょう。 住民が 何 
に 不満 を 持って いるか や， 今の 入口が わか 
る。 

"グラフ" を 見て みょう。 各 データの 年間 
推移が わかる。 

"マップ" を 見て みょう。 犯罪発生率 ゃ警 
察 管轄 区域， 大気汚染な ど の 分布図が 見 ら 

れる。 

そして， にたにた 笑いながら, 都市 は 未 

来 を 目指す の だ。 未来 都市に は 2 種類 ある。 
「ブレード ランナー」 な 都市と 「宇宙 戦艦 

ャ マト」 な 都市 だ。 いま 私が そう 決めた。 

どっち を 目指す も 君の 自由。 そ 一う まく は 

いかない けれど。 
シ ムシ ティー も はま る と 病気になる ので, 

それだけ は 注意しょう。 街 を 歩きながら， 
「ここ は 商業地区」 だな， とか 「 お， 渋滞 

は な ん とかし なきや」 などと 気分 は 市長 に 

なって しま うの だ。 
ダン ジョン マスター， ポピュ ラスに 統く 
"危険な ソフト" である こと は 保証す る。 

参考文献 

1) ト ボスの 知 河 合 隼 雄 • 屮村 雄ニ郎 • 他 

2) 図説 都市の 世界史 レオナルド • ベ ネヴォ 
一口 著 佐 野 敬 彦* 林 宽治訳 相模 書房 

3) ロココ 町 ft 田 稚彦» (今月 の 「新刊書 案内」 
参照の こ と） 

都市 型 ゲーム は まだまだ いける。 都市 をモデ 
ル にシュ 一ティングし たのが グラナダ であり， 
その ま ま シミュ L ^一 ショ ン にした のが シ ムシ テ 
ィー だ。 「都市と 箱庭」。 これが ポイント だよ， 
各ソフ ト ハウスさん。 

5 段 «W 価 
箱庭 度 ： ★★★★★ 
都市計画 度 ：★★★★★ 
1/8 計画 度 ： ★★★★ 
ァ バウ ト な 操作で 0K 度 ： ★★★★ 
ウィン ドウ バシ パシ ： ★★★★ 
民の 力 マ 度 ： ★★★★★ 
PCM 効果音： ★★★★ (ただし， 評価 版） 
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き ギャラ ガ' 88 


シンプル だから こそ 飽 さない ゲーム 


Nishikawa Zenji 

西 川 善 司 


ゲームの 少なかった 1 o 年 前に 登場した ギャラ クシ アン c 
その ギャラ クシ アン は ギャラ ガ へと パワーアップし， 

そ して 今 また ギャラ ガ' 88 となって 我らが X68000 に D* 
つてき た。 時の たつの は 早い ものよ のう。 


UP HX<M ftCORE 

OO SOOOO 



ギヤ ョ« "笋 


• ■ ザ 


おい， どうした？ 元気ない じ やん。 え？ 
出^料が 安 かつ たって？ な に!？ 


ギャラが 88 


(円） 


なんちて， ぼつ 〈ん， だは はは はは は （編： 
…… は あ ~ つ）。 

という わけで， 電波 ソフトからの ァ一ケ 
一 ド ゲーム 移植 シ リーズ 第 何 弾か 忘れた け 
ど， とにかく 発売され たので ご 紹介しょう。 

ギャラ ガ' 88 がァ ーケ一 ドに 登場した の は， 
昭和 88 年 と 思った 入の 裏 を かいて 实 は 1988 
年に 登場した。 「ギャラ ガ' 88」 は， いうまで 
もない と 思う 力 f 「ギヤ ラ ガ」 の 続編 だ。 ゲ 
ーム センター にいる 小僧に 「ポク？ 『ギヤ 
ラガ』 つて？; 11 つてる？」 なんて 聞けば 10 人 
中 13 入ぐ らい 力 1 「知って るサ！ ！」 と 答える 
に違いない。 つまり， それぐ らい メジャー 
な ゲームの 統 編なん だな。 

ギャラ ガ' 88 は， 実 をい う と アーケードで 
登場 したと き は そ れほ ど ヒットし なかった。 
というの は， 1988 年と いえば 「ギャラ クン 
一 フォース」 「アサ ル ト j と 力' 「グラ ディ ゥ 
ス II」 な ど の 大作が 次 か ら 次へ と 出た 年で, 
ズ バリ， これらの 大作の 陰に 隠れて ィ マイ 
チ 注目 を 浴びる ことがなかった。 なかには 



「ギャラ ガ' 88 つて PC エンジン 辨- 用の ソフ 
ト かと 思って たよ」 なんてい う 入 もい るに 
違いない。 


なぜか 面白い、 


しかし， 今 X68000 で プレイして みると， 

これが 面白い。 どこが 而 白い つて， そり や 
ゲームが 面白 いんです よ。 意味の ない 拡大 
縮小， バカ でかくて やたらに 堅い ボス キヤ 
ラ， ここ 最近の アーケード ゲーム は プレイ 
する より 見て いる ほうが 楽しい とい う のが 
私の 正直な 見解。 ところが これ は 純粋に ゲ 
ームが 面白い， 遊べる ゲームなん ですな。 
まず， スタート すると， 編隊 を 形成す ベ 
く 画面 外 か ら リ 一ダ 一を 先頭に 飛来 し て く 
る。 このと き， 編隊 を 組ませる 前に 全部 擊 
破す る 快感と いったら …… 。 そうそう， こ 
の リーダー （武 色くて 少し 太った やつね） 
が なかなか コ シャク なやつ で， 人 を 馬鹿に 

したよう に |W| 而 中央で クル クルと 回って 
高速で 離^して いく。 こいつ を 仕留めた あ 
とに 出て くる 「700」 という 数字。 これ を 見 
たいがた めに ジョ ィ スティックの トリ ガを 
押す ス ピー ドが速 く な る わ けさ。 編隊 を 組 
まれて しまつてから は， ギャラ ガ たちの ト 
リ ツキ 一な 動きに 雇され ない よ う に 神経 を 
ピリ ピリ。 ちい， こんなに 緊張した の は 幼 
稚 「II の 入園 式 以来 だぜ， ベ イビ一， たいし 
たやつ だ， おめ 一って やつ はよ お。 


ボーナス ステージ * 


ギャラ ガを 語る う えで 絶対に 忘れて なら 
ない のが ボーナス ステージ。 通常 ステージ 
での ギャラ ガ たちの 動き も かなり トリ ツキ 
一 だが， ボーナス ステージ では それに も 増 
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して トリッキー だ。 し 力 > し， 相手の 動き 力 5 

意表 を 突く もので あれば ある ほど， 100 パー 

セント を 狙いた くなる というの が 人情。 こ 
こまで 来る かと 思えば 手前で 引き返して 去 
つてい つたり， 全滅 させた と 思いき や 生き 
残りの ギャラ ガが スーツと 画面の 外に 出 て 
いったり。 そんなと きの 悔しさと いったら 
…… 。 ちい， こんなに 悔しい 思い をした の 
は 高校 受験 以来 だぜ， べィ ビー。 

ところで， この ボーナス ステージで 1 発 
も 撃たずに ギャラ ガ たちの ダンス を ボー ッ 
と 見て いると， シークレット ボーナス ポィ 
ン 卜が 莨え る。 通常 ステー ジ での バ ト ルで 
疲れた 指と 手 を， 'ギャラ ガ たちの ダンス を 
見ながら 癒す というの もい いか も しんない。 


移植の 出来 は 7i 


いや あ， 文句の ない 出来栄え。 PC ェンジ 
ン では 力 ッ 卜 されて いた 面 スター ト 時の 
「おによ によに よに よ」 と 叫ぶ ボス ギャラ 
ガの アイ キャッチ シーン もちやん と あるし。 

そういえば， 最近 電波 ソ フ ト は MIDI に 対応 
しなくな り ま したね。 ど う したんだ ろ。 あ 
と， 「ギャラ ガ' 88」 つて アーケード では 縦 画 
面の ゲーム だつ たんだよ ね 。「ド ラ ゴンス ピ 
リット j を 移植 したと きのよう に 縦 画而モ 
- ドも 付けて ほしかった な。 

X6B000 用 5"2HD 版 2 枚 組 8, 200 円 (税別） 
'山 波 新 M 社 303(445)6111 


まとめ 

X68000 版 1 " ギャラ ガ' 88」 に は， 例によって 電 
波 アレンジ モー ドが 付いています。 ポー ナス 
ステージで， なんと， なつかしの ナム コ キヤ 
ラク ターた ちが 音楽に のって 踊って し まう の 
です。 ミュー キーズ や ニヤ一 ムコ たちが 華) R 
に 踊って いるの を孥ち 落とす なんて 可愛そう 
で 俺に はで きないせ。 が， その 優し さが 命 取 
りになる つて こと だけ は 忘れるな， ベ イビ一。 


自機は 左右に しか 動かない つてと こが ミ 


踊る 踊る， 回る 回る つて か 


グラフィック 
音楽 

ゲーム 性 
お買い 得度 
何回も 楽しめる ぜ度 
エンデ ィ ングの 感動 度 
次回 作に 寄せる 期待 度 


8 
8 

10 


9 
10 


30 Oh! X 1990.9. 


參 クオ一 ス 



去年， 1989 年 は， まさに 「テ トリ ス」 を 
はじめと して パズル ゲーム 大売り出しの 年 
でした。 その 昔の ニン ジャ ブームのと きに 
は， 各 ゲーム メーカーが 揃いも揃って 忍者 
もの を 作った ように， 去年 （正確に は 去年 
から 今年に かけて） は 「テトリス」 に 追い 
つけ 追い越せと ばかりに， 数え切れないぐ 
ら いの 量の パズル ゲームが 発売され てい ま 
す。 

さて， と。 まだ 「テトリス」 ブームの 余 
韻が 残って いる 現在， この 「ク オース」 を 
見て 連想す る ゲーム を ひとつい いなさい， 
と 道行く 人に 聞いた としたら …… 。 悲しい 
かな， 10 人中 9 人 はお そらく 「テトリス」 
というでしょう。 残りの 1 人 は， きっと 僕 
みたい に 受け を 狙って 「クレージー クライ 
マー」 と 力 '「ファイナル ラップ」 と 力' いう 
ひね く れ者 だろ うな。 まあ， きつ と パズル 
ゲームの ほとんど はこうい われる のか も し 
れな いけど （なんてつ たって 普通の 人が 知 
つてい る ゲームって， 「ドラ クェ」 と 「スー 

図 I 


前 ^ 聞の シ ユー ティ ンク パス ル 

Nishikawa Zenji ファミコン や ゲーム ボ一ィ などで も 発売され ている一 

^5J|| li 司 風 変わった パズル ゲーム， ク オースが X68000 にも 登 

場。 アーケード 版と そっくりの デキ， 友達と 2 人で 遊 
びたい ゲーム だ。 


パーマ リオ」 と 「テトリス」 ぐらいた * もん 
な）。 

この 「ク オース」， シ ユー ティング' ゲーム 
的な 要素 を 取り入れ たの は 「お， 頑張って 
るな」 と 思わせる のです が， ブロックの 形 
を 揃えて 消す， という 点が どことなく 「テ 
卜 リス」 を 思い起こさせる のか もしれ ませ 
ん。 ま， それ はおい といて さっさと 紹介し 
ていき ませう。 

移殖の 出来 は 7 

さて， 「ク オース」 はノ、 °ッ ケージに r ァ一 
ケード 版本 格 移植!!」 （最後の 1 "!!」 がポ イン 

ト） と 銘打って いるよう に アーケード' 版 そ 
つく りです。 たしか アーケード 版 も 横 画面 
だった ので まさに 完全 移植， いや あ， 文句 
のつ けよう がないで すな。 はは は。 多少 ァ 
—ケ一 ドの ほう が 解像度が よかった ような 
気 もします 力 f , まあ， その へんは 目 をつ む 

りましょう。 音楽 は 原曲 を 間いた こ とがな 
いのでよ くわ かりま せんが， たぶん ァーケ 
ード そっくりでしょう。 . 

ク オースの ルール 

ルール は简 単。 図の ように 迫り 来る プロ 
ック に対して， 自 機の 放つ ブロック 弹で隙 
間 を 埋めて 四角形 をつ くって やる と， あら 
不思議， ブ ロック が 消 えて なくなり， 消 し 
た プロ ックの 数 x 10 点が 得点 となります。 
また， まとめて 消す と 大量の 得点 が 得 ら れ 
ます。 このよう にして， ブロック を 消しな 
がら どんどん 先へ 進んで いきます。 先へ 進 
めば 進む ほ ど ブロ ッ クの 落下 速度が 速 く な 
つてき ます （こり や， スリル だ ぜ）。 しか 
も， はじめ， 1 面目で はなん の 変哲もない 緑 



打って， 打って， 消して， ああ 忙しい ぞニ リ や 


色の ブロ ッ ク です 力、 面が 進む となんと， 
なんと， ブロックの， ブロックの… は あは 
あ… 色が 変わって いくのです。 す， すごい 
つ。 次の 面 はいった い 何 色に 変わる のだろう， 

と 手に 汗 握る ゲーム 展開 を 繰 り 広げて く 
れ ます。 途中に 出て く る 銀色の ブロ ックを 
消 す と ， 画面 上の ブ ロックす ベて が 消 え て 

くれます。 で， 金色の ブロック がその ステ 
ージの ボス （？ ）。 これ を 消す と 1 ステージ 
ク リアです。 ちなみに ブロックに 侵略され 

る と ゲーム オーバ一 です。 

3JVJ エー シ ヨンの プレイ ― 

「ク オース」 に は 3 種類の 2P プレイ （2 人 
同時 プレイ） モードが あります。 ひ！： つ は 
ご存じ 「対戦 プレイ」。 自分の 消した ブロッ 
クが 相手 側に 移る という やつです。 これ を 
友達と やる と 友達 を 失いそう だな あ。 はは 
は （もっとも 「ク オース」 で 断 たれた 友情 
の拌 つての も 情けない けど）。 2 つ 目 は 「同 
時 プレイ」。 ただ 単に 2 人並んで 遊ぶ だけ。 
3 つ 目 力 * r 協力 ブレイ」 で， ひとつの ブロ 
ック なんか を 2 人で 協力して 消す， なんて 
ことが 可能。 対戦で 失った 友達と すれば 仲 
直りつ （もっとも 「ク オース」 で 復活した 
友情の 絆っての も 情けない けど）。 


ゲームセンターで ハ マッタ 人 や， ノ、 。ズル 
ファンの 人なん かに はォ ススメ かも。 


X68000 用 

5"2HD 版 6,800 円 (税別） 

コナ S 

003(262)9110 


まとめ 

「ク オース」， やり 始めて みると 結構， 面白 
い。 どれく らい 面白い かって？ 弱った な。 
じゃあ 「スパイ 大作 戦」 とか 「ウォーク ' ヮ 
ン」 くらい 面白い ぞ， といって おこう。 やつ 
ばし， 対戦が いちばん 面白い かな。 そうそう， 
緣を 切りたい 友達が いるの なら 「対戦」 より 
も 「協力」 プレイが 効果的 だぞ。 わざと 相手 
の 足 を 引っ張る の だ。 「あつ， ごめ一 ん」 とか 
いって 四角形に なりそう なブロ ック に対して 

2, 3 発 多く 擊 つて やる の だ。 いい ぞー。 ご 

つ く ん。 

グラフィック 6 

サウンド 5 

ゲーム 性 5 

テ ト リス に似てる ぞ度 8 
グラディウス 2 か 3 を 作って ほしい 度 10 
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Communication PR0-6BK ver2.0 



シャ-プの 齷 ソフトが 
バ-ジョンアップ 

Yoshida Kouichi 

吉田 幸 一 

パソコン通信 ファンに は うれしい お知らせ o 

あの Communication PRO— 68K が バー ジョ 
ン アップした 。初心者で も 使いやすい ォーソ 
ドック スな ツール。 ペーパー ホ ワイ ト 画面で 通 
信が できる よ〜 ん 。MNP にも 対応して いる。 



XB8000 用 5"2HD 版 19,800 円 （税別） 
シャープ 003は60)1161 


昨日， メインで 遊んで る 草の根 BBS の 
オフライン ミー ティ ング " と かゆ 一 ものに 
行って きた。 ヘンな やつが いっぱいいて 面 
白かった。 儲かり まんな あ， NTT。 

I Communication PRO-68K verl.O , 
および WCom 隱 ication PRO - 68K を 
使って いる わけ 

従来の Communication PRO~68K の 重 
大な 欠点。 そ れは ASK-68K ver.2.0 に 対応 
していない のか 変換 候補の 表示が う ま く な 
かった の だ。 プログラムに パッチ を 当てる 
PDS 2 ' を 入手し 対応せ ざる をえなかった。 
ま た， この MNP 時代に 不可欠な" ハー ドウ 
ェ アフロ 一 制御" も 対応して いなかつ た。 

し 力' し， それても 私 は Communication 
PRO-68K を 使って いる。 白地に 黒の 画面 
と 80 x 25 行 しか 使わない 余裕の あ る 画面 構 
成が 好きだから だ。 た 一み の る や Muterm 3) 
では 画面 全部が ターミナル だし， それで は 
X68000 が 端末 専用機に な つ た 気がす る の 
だ。 せっかく だから， そんなの いや じ やん。 

Iver2.0 への 変更 点， 
および Communication PRO- 68K の 翻と， 
清 〈正しい (！? ) 逆 スクロール 
Communication PRO-68K は 写真の よ 
うに 立ち上 力 * る。 真ん中の ホ ワイ ト ボード 
みたい のが ター ミ ナル 画面。 黒地に ft の モ 
ードも ある。 この モード だと， ESC シ 一 
ケンス で 色 を 出せたり する （ANSI ター ミ 
ナル モード"）。 ここ は パソコン通信 では 
一般的な 80X 25 行。 で, 80x25 行と いう こ 
と は 上下 7 行 と 横 16 桁が 余 る。 そこ を どう 
使 う かが X68000 のおい しさ を どう 出す か 
につな がる。 

最上 行 は ファンクションキー 表示。 最下 
行 はかな 漢字変換で 下 か ら 2 番目 は 行 編集。 
右の 余った 桁 は 各種 情報 表示に 使われる。 
まず 通信 状態。 送信 可能 かどう か， モデム 
から キャリア はきて るか どう 力'， 逆ス クロ 
ール モー ドの と き 何 行 逆 スクロール してい 
るかが 出る。 で， 注意すべき は キャリア 検 
出。 モデム の ほう 力 f ， キヤ リ ァを 端末 （ つ 
ま り パソコン ） へ 返す モー ドと 常に キヤ リ 
ァ ON の 信号 を 出す モー ドを 持って い るの 
だ。 たとえば AIWA の MN P モデム 5 > だと， 
デフ オル トで CD 信号が ON になって いて， 
キャリア がきて なくても 「キャリア あり」 
表示に なって し ま つてなん か 気持ち 悪い。 
モデムの設定 は 重要で あ る （その 1)。 

その 下 は 伝送 データ。 受信 パイ ト数 やら 
受信 行数 やら そ う いった ものが 返される。 

さ らに， 漢字 コードの モード （シフ ト JIS 
が MS 漢字 と 表示 される のが 少々 気に入ら 
ない が 6 ))， カレント ドライブの 空き 容量， 


現在 I 寺 刻， 接続 暁 問が 表示 される。 

が, こ こ で 欠点。 X68000 の ソフトに は 
珍しく， マウスに 対応して いない。 対応し 
て も バチは 当た ら な い と 思 う の だが な あ。 

さて， ファンクションキー を 押して 通信 
を 始める。 ファンクションキー は， ェ ：?■" ィ 
タ （後述)， ブレーク 行 入力， 自動 実行 （詳 
しく は 後述)， オート タイプ （アップ ロー 
ド のこと）， ログ 開始/終了 （ダウンロード 
のこと）， ログ スィッチ （ダウンロードの 
最中に その ON/OFF がで きる）， ログ 削除， 
チャイルド プロセス， 終了， の 10 個。 

さらに SHIFT キー を 押す と， 環境 設定 
(詳しく は 後述)， 受信 データ 同時 印刷， 受信 
データの 16 進 表示， 画面の 色 （ホ ワイ 卜 ボー 
ドか 黒地に 白 か）， 画面の 行数 (20/25), プロ 
ト コ ル 送信， プロ トコ ル 受信, CPROl. U の 
実行， CPR02.U の 実行， 回線 切断， である。 

変更 点 は， プロ 卜 コル 送信/受信と CPR 

01. U/CPR02.U の 2 つ。 プロ 卜 コル 転 
送 7 ) について は， 旧 バージョン では XMO 
DEM と Transits だけ だつ たのに 対し， ver 

2. 0 では XMODEM に 3 種類， YMODEM が 
新しく 4 つ 追加され， 従来から あった Tra 
nslt2 も 加えて 8 つに なった。 ほ 力' に ZMO 
DEM とか も あるが， この 8 つが あれば た 
いてい 間に合う。 

で， プロトコル 転送 を ひとまとめ にした 
おかげで 余った 2 つの ファンクションキー 
に は 名前 固定の 自 劻 実行 フ アイ ルが 書け る 
ようになった。 これ は 結構 便利で， シス テ 
ムには CPR01.U として， MNP モデムの M 
NP 設定 用コ マン ド 列が 登録され てい る。 
MNP モデムに は 実は デフ オル トで ノーマ 
ル モードに なって いるものが あり， その 場 
合 は 自分で 設定す る 必要が ある。 モデムの 
設定 は 重要 だ （その 2)。 

そうだ， 逆 スクロール 機能 を 忘れて はい 
けない。 立ち上げ 時の 設定で メモリの 許す 
限り （設定した 値 を 上限と して） 逆ス クロ 
ール バッファ を 持って いるの だ。 通信 時に 
T キー を 押せば あらあらと， 画面が 逆スク 


ロール を 始め る。 SHIFT キ- 
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設定 変更 も 二ん なにわ か り やすい 




速 スクロール （本当に 高速 ！） して くれる。 
行 単位で 範囲 指定 して ファイルに セーブし 
たり エディタに 転送で きる ので， ダウン 
口 一 ド し 忘れた り 見逃 し た メ ッ セージ を 確 
認 したいと きも 0K 。でも， PRO と 名乗る 
からに は， 任意の 位置から 文字列 単位で 範 
ffl 指定と 力 1 ， マウスで やりたい とか 思う ぞ。 

通信に 欠かせない 日本語 入力 だ 力 5 '， イン 
ライ ン 変換 モード だと う ま く ない ので， 
ちゃんと 変換 行での 入力に して 使う よ う に。 

では， 「詳し く は 後述」 シリーズ。 
•I ディ 夕 

タ一ミ ナル 画面の 上 8 行に エディ タ ウイ 

ン ドウが 開く。 力 ? ， 既存の ファイルへの 
オーバーライトが できない （ファイルへの 

追加に なって しまう） などの 問題 は ある。 
これ はつ まり， ちょっとした 送信 用フ アイ 
ルを 編集したり， 逆 スクロール バッファ 力 1 
ら 転送した ファイル をち よこち よこと 編集 
して セーブす るのに しか 使わない の だ。 た 
いてい， チャイルド プロセスで ED.X なり 
なんなり を 立ち上げる こ とになる。 

MNP と は 

最近よ く 聞かれる MNP。 これ は マイクロ コム 
• ネット ワーク • プロ ト コルの 略 だ。 

何 かってい うと， エラ一 フリ一 プロトコルの 
—種 だ。 パソ コ ン 通信と い う の は 無手順 非同期 
式， 別名 無手順 垂れ流し 式な ので ある。 これ だ 
と 通信速度 を 速くで きない （文字化け やら 文字 
落ちが 出ち やうの だ） と 力、， 文字化け に対する 
対処が できない という 欠点が あった。 そこで， 
アメリカの Microcom 社 は 考えた わけ だ。 モデム 
と パソコンの 間 は 無手順 垂れ流し のままで， モ 
デム 間 を 同期式に してやれば， モデム を 換える 
だけで エラ 一フリーに できる ぞ， と。 

そんでも つて， MNP プロトコル はでき た。 正 
確に は MNP クラス 4 がそう だ。 2400bps でモデ 
ム間 だけ 同期通信 をす る。 そうすると， 文字 化 
けが あ つたり したと き は モデム 間で 送 リ 直し な 
どの 訂正が できる ので， ユーザ一 から 見たら ェ 
ラ 一フリーになる の だ。 同期通信に は 今までみ 
たいな スター ト ビット や スト ッ プビッ ト ではな' 
く， 一定の 大きさの パケット ごとに 行う。 で， 
バケツ 卜が一 杯に ならない とき は一 定時 間 入力 
がない と 相手に デ一タ を 送る よう になって いる。 
そのために 画面 表示が とき どき 止ま るよう な嫉 


• 環境 設定 

MNP モデムに 対応す るた めに， CTS/ 
RTS 制御 8) が 加わつ た。 こ れで， CTS/RTS 
と いう ハ一 ドウ エア 信号 線 を 使った フロー 
制御 も 可能に なった。 で， MNP する と き 
に は， モデム 側 も いろいろ 設定した ほう 力す 
いい。 Communication PRO- 68K で CT 
S/RTS を ON に して も モデム 側が フロ一 制 
御 OFF に なって いて はなん にも な ら な い 
からね。 モデムの設定 は 重要 だ （その 3)。 
MNP について は 囲み を 参照して ほしいけ 
れ ども， モデムの マニュアル は 概して 読み 
にくく， 専門家 以外に はわから ないように 
書いて あるので， 注意が 必要 だ。 
• 自動 実行 プログラム， つまり は マクロ 

通信 ソフ ト を 測る と きの ひとつの バ ロメ 
—タが 自動 実行 プログラムの 機能。 命令 数 
は 42 個 と 一般的。 ver2. 0 では 4 つの 追加 関 
数と， 5 つの 拡張され た 関数が ある。 

自動 実行 フ ァ ィ ルは 拡張 子に " .U " がつ 
く 力、 ら， ウィンドウから 力一 ソル キーで， 
てて て 一つと 選べば いい。 この フ アイ ノレ は， 
システム について く るの を コピーして ェデ 
ィ タで誉 き 換える のが 面倒が な く て 得策。 

I Communication PRO— 68K のおい しさと 
使い 勝手と 
明日への 扉 

Communication PRO- 68K は 初心者 用 
として は 十分 速く， とつつ きやすい。 あと 
は 才一ト ログオン フ アイ ル 自動 作成 機能 と 

ヘルプ 機能， ホスト 管理機能 くらいだ。 

通信 ソフ ト という の は， 「これ だ ！ 」 と 
い う 決定 打が （PC- 9800 の 世界に も） な く 

じになる の だ。 

て 二と は， ノ、' ソコン から 見る と スタート ビッ 
トとス トツプ ビッ トを I ビッ ト 加えた I 文字 10 
ビットな わけで ある 力 《 ， MNP モデム 同士 はパ 
ケッ ト を 使う ので スタ一 ト ビッ トゃス ト ップビ 
ット はいらない。 よって I 文字 当たりの 平均 を 
とる と， 10 ビッ ト 以下。 そこで モデム一 パソコン 
間の 通信速度 を 2400bps より 速く してやれば， 2 
40Dbps よ りちよ つと 速い 通信が 可能になる の だ。 

MNP クラス 5 になる と， モデム 間の 通信で デ 
一夕 圧縮 をして くれてし まう ので， 普通に やつ 
ている ぶんに は 倍の 速度 （見かけ上 4800bps 相 
当の 速度） が 得られて しまう （らしい） の だ。 

という わけで， モデム一 パソコン 間の 通信 速 
度が 4800bps 以上で な い と 意味が な い。 モデム 
が 2400bps だからと いって， 律儀に 2400bps でソ 
フトを 使う やつ はタコ なので ある。 MNP モデム 
に は モデム 間の 通信速度と モデム— パソコン 間 
の 通信速度が 違 つてても 構わない ょコ マン ドが 
あるの だ。 モデムの設定 は 重要で ある （その 
4〉。 ちなみに， その 1〜3 は 本文ね。 

パソコン 側から は モデム一 パソコン 間の 速度 
しか 設定で きない。 では モデム 間 はどう してい 
, るかと いうと， モデムが よきに はからって， 相 
手の モデムの 都合に あわせて 最適の 速度に して 


て， 各社 あの 手 この 手で 試行錯誤し ている。 
た と え ば 登録 ホ スト を ホスト 名で 管理 し た 
り （閉じた データベース） と 力，， 通信 中に 

呼び出せる ID と ハン ドル ネームの デ一 タ 
ベースと か だ。 そういった 点で はこの ソフ 
トは ひどく 才一 ソドヅ タス だ。 だから 使い 
やすいと もい えて， 私 は 使って いるの だ。 

だが， ホストの 電話番号 や 名称， プロ 卜 
コル や I D は 立 派 な データべ一 ス だ。 た し 、 
て し 、 の 通信 ソフト は そ の 世- 界で^ じている。 
あまりに も 前 時代 的 だ。 私の 知 る 限り， ホ 
ス 卜の データ も 住所録 も 別け隔てな く ひと 
つの データべ一 ス として とらえて いた ソフ 
トは ひとつ だけ。 それ は， MZ-2500 テレ 
フォン ソフト （笑)。 

D こう いった 集ま りに は 珍し く 女の子が 多 か 

つた （II 人中 4 人！）。 ラッキー。 

2) Nifty- Serve で 見つけた。 

3) サンデー ネッ 卜が 出 ど 二ろ のフ リー ウェア。 
通信 ソフトの 場合， PDS の ほうが 概して バグが 
少ない。 いろんな 人が 使う のと， まめに バ一ジ 
ョ ン アツ プ する からだ。 

4) ANSI というの は， アメリカ 国内 規格 協会， 
つまり アメリカで いう JIS みた いなもの。 そい 
つが 国際機関に なると ISO になる。 ANSI の 前身 
が ASA である。 ほら， フィルムの 感度 を ASAI00 
とかいって いたのが 最近で は ISOI00 になった で 
しょ。 あれ は アメリカ 国内の 規格が 国際的に な 
つた ひとつの 証 だ。 

5) ちなみに， 私が 使って いるの は AIWA の PV2 
4-MNP5。 

6) MS-；蕖 字の MS は MS — DOS の MS である。 

7) 無手順 垂れ流 し では パイ ナリ ファイル を 送 
れ ないし， エラー チェック もで きない。 そこで， 
バイナリ ファイル 転送 ffl の プロ ト コルが いろい 
ろと できた ので ある。 

8) MNP の 囲み 参照 


くれる ので ある。 相手が MNP でなかったら， 
ノーマル モードで 接続して くれる の だ。 ただし, 
モデムが そ う いった 設定に なって いれば (AT¥N 
3) の 話。 モデムの設定 は 重要で ある （その 5)。 

そんでも つて， 私の ように モデム— パソコン 
間 を 9600bps にす る といく ら なんでも 速す ぎる。 
そうなる と， モデムの バッファが 溢れた とき， 
パソコンに r ちょっと 待った」 といって やらね 
ばなら ない。 それが フロー制御 であり， ソフト 
で やる の を XON/0FF , ハ一 ドで やる の を RTS/C 
TS 制御と いう。 

公衆 回線 を 対象に した MNP のク ラス は， 7,9,10 
と まだまだ 先が ある。 通信の 世界 もハ一 ドゥエ 
ァ （だけ） は 進んで いるの だ。 

という わけで， MNP というの は， モデム 同士 
で いろいろ とよきに はからって く れる 規格 だと 
思えば よ ろしい。 

ちなみに， MNP と XMODEM を 同時に 使う の 
はよ した ほうがいい。 なぜなら， MNP と XM0D 
EM の 両方で エラ一 チ 1 ックを やって いるので 
無駄で あり， その ぶん 遅くなる からだ。 

MNP していれば エラ 一フリーな ので， テキス 
ト ファイル （ISH ファイル を 含む） だったら， 
そのまま 転送 すれば いい。 以上， MNP の 解説で 
あった。 ふう。 真面目な こ と を 書く と 疲れる。 
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AFTER REVIEW 
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今月 は大 航海 時代， プロ ミスト ランド， ゥ 

ルティ マ V， SX- WINDOW の 4 つ を 取り 
上げて みま した。 どれ も じつ く り 腰 を 据え 
て 取り組みた いものば かり。 時間が あるう 
ちに 試して みて はいかが？ 



大 航海 時代 


r 


'賭博の トラ. 


- (18) 
まショ 


'プが 結構 ハマる ぜ ！ 

宮城県 • 和 ih m 
► これ は， まるで "川: 界 ガッチ' リ買 t 
だとい う 話 も ある。 

石川県 • 須田 正 幸 (24) 
>な かな か 史実 どお りで， 地 ffl の 勉強になる 
と 思う 理系'; 良人 生の 夏。 

千葉県 • 安武 重 人 （19) 
► 基本的に この ゲーム は データと の 戦 いで あ 
る。 どこに どんな 港が あって， そこに は 何が 
売って いて， 物価が いくらで …… というの を 
全部 把握しょう とすると かなり 疲れる。 三国 
志 II な どで は 別 に 出して いる 本の ほうに いろ 
いろ 載せて いた 力 J , ゲーム 本体に だって 安く 
ない お金 を 出して い る 
ん だから， 参考資料と 
して 何 か 付けて ほしい 

と 心 O i wo 

愛知県， 勝 川 俊 司 （21) 
► なん といっても SL 
G と RPG を ミックス 
したよう な 感じ 力 ？ いい。 
静岡県 • 青 島 一高 (22) 
► Xlturbo に ひさしぶ 
り に 出た 遊べる シミュ 
レ一 ショ ン ゲームな の 
で。 

栃木県 • 加 藻 育生 （17) 


► ゲーム そのもの はわり と 面白く， 地図 帳と 
二 ラメ ッコ しながら やる とな かな か 遊べ る 
(地理 や 経済の 勉強に もなる し）。 たとえ ジ 
ブラ ルタ ル海峽 を 渡る のに 四苦八苦しても， 
力 ? つぼり 大 儲けした と きの 気分に は 代えられ 
ない。 特に 貯金す るの が 好きな 人に はおす す 
め。 ところで， 私 はま だ イスタンブールに 入 
れて も ら えない の だ。 誰か ィ ス ラムと 仲よ く 
する 方法 を 教えて 一。 （浦 川 博 之） 

光栄と いえば シミュレーション。 しかし， 
これ はいつ もと ちょっと 違う。 REKOEITI 
ON GAME 第 2 弾 だから， ロール プレイン 
グ的 要素が 盛り込まれ ている。 だから， あの 
テの ゲームが 好き じ やない 人で も とつつ き や 
す いんじゃ ないかな。 

XUurbo 用 5 "2HD 版 4 枚 組 9， 800 円 （税別） 
光栄 0044(61 )6861 

'マ 冊 紙 J an J に' 
アル ぞ： ？ ^ 



発売中の ソフ卜 


★ ト ン ネル ズ& ト ロールズ 

こ 二 カザン 帝国で は t 魔術師 カザンに よる 統治 
の 後， 邪悪な 死の 女王 レロ卜 ラーが 即位し， 以来 
激烈な 戦闘が 続いて いた。 そして 今， 続発す る不 
思議な 出来事に， 誰もが 不安 を 感じて いた。 そし 
て 皆が 魔術師 カザンの 再来 を 願って いた …… 。 

マニアに 絶大なる 支持 を 得て いる テーブル トー 
クのハ 'ソコ ンゲ一 ムィ 匕。 テーブルトークの シス テ 
ムを 用いて 作られた RPG で， 豊富な テキストと ァ 
ド ベンチャー のよ う なス ト一リ 一展開が ゥ リ だ。 
綿密な 世界 考証と 豊富な アイテム は， 本格派と 呼 
ぶに ふさわしい デキだ そ'。 

X68000 用 5"2HD 版 3 枚 組 9, 800 円 

スター クラ フ ト 》03 (988) 2988 

★ 提督の 決断 

太平洋戦争 を 題材に した シミュレーション。 日 
本 軍， 連合国 軍の いずれ かの 艦隊 指令 長官と なり， 
太平洋の 制 海 • 制空権 を 握る ために 敵 基地 を 攻略 
していく。 プレイヤ一 自ら 艦隊 を 率いて 航行し， 
途中 艦隊 戦な ども 行いながら， 敵 基地 を 空 H, 艦 
隊 砲撃， 上陸な どで 陥落させる。 作戦の 合間に は 
国防 体制の^ 実な ども 図ら な ければ な ら ない。 太 
平洋の 戦局 は 君の 腕に かかって いる。 

3 編に 及ぶ マルチ シナリオ 方式 を 採用。 2 人 ま 
での 同時 プレイ もで きる ので， 友達と 楽しむ の も 


5"2HD 版 2 枚 組 14, 800 円 
0044(61)6861 


いい かも。 

X68000 用 

光栄 
★ D- Again 

ブロン ウイ ン ファン 待望の シリーズ 第 5 弾。 戦 
閱 シーン を 配した， もはやお なじみの スタイルの 
アド ベン チヤ 一ゲーム だ。 今回の ブロン ウィンの 
任務 は 特務 機構 長官 護衛。 しかも 観光客 を 装って 
任務 を 遂行 しなければ な ら ない。 これに 絡 む ■ 
WF の アングラ 'マ一 ケッ 卜の 崩壤と ダル ジィの 
復活。 そして 出現す る 強 棲 獣 曙 兵器 G-R。 

二れ で 第 4 の ュニッ 卜 シリーズ 第 I 部 WWWF 編 
が 完結 するとい うから ファンの 人 は 見逃せない。 

X68000 用 5"2HD 版 4 枚 組 8, 800 円 

データ ウェスト O06 (968) 1 236 

★I メラ ルド 伝説 

宇宙の 果てに 存在す る 惑星 「セラ」。 この 星 は 
ェメ ラル ドに 収められた 5 つの 結晶 体の 不思議な 
力に 守られて いた。 突如 現れた 破 壞神ソ ドムから 
セラ を 守る ため， ひとりの 少女が 立ち上がる。 変 
化に 富んだ 景色 を パックに 繰り広げられる RPG D 

X68000 用 5"2HD 版 7, 800 円 

システムハウス 才一 O075 (502) 2972 
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， ウル ティ マ V , 


► 今 はこれ しか やって ないから。 

奈良県 • 渡 辺 智一 （20) 
► 今 ま での ポ ピュ ラスに 加えて いろいろ な 種 
類が でき て バリ ェ一シ ヨン アップし たので。 


京都府 • 和 田 
- キャラ 力 f 力 1 わい い。 

滋賀県 • 三撟 
'ひさびさに 面白かった。 

山形県， 荒 井 
'もこ もこむ くむく， やめられ ま 

京都府 • 可 児 

'キャラ クタ一 がと て も L 
. く にいい。 神奈川県 


—博 (23) 


和 広 (22) 


藤 博 (30) 
、ん。 

典 明 (17) 
、。 江戸時代 編が 
泉 田 好 介 （20) 


ポピュ ラスの シナリオ データと あって 人気 
に ヒ々。 なかで もォ リ ジナル の 江戸時代 編が 好 
評の ようです。 苦労した 甲斐が ありまし たね, 
イマ ジニァ さん。 


X68000 用 
イマ ジニァ 


5"2HD 版 4,800 円 （税別） 
003(343)891 1 




タウン ガー ドの横 をす りぬ けて 街へ 入る あ 
ス リルが たま ら ない。 

埼玉県 • 高 橋 ー毅 （19) 
ロール プレイン グの 帝王で あ る 。 

大阪府 • 康 正 和 (17) 
前から やって みたかつ たから。 

香川県 • 形 幅 哲也 （17) 
一生 かけて も 解けそう にないから。 

福岡県 • 馬場 広昭 (21) 
面白い と しかいい ようがない。 

埼玉県 • 島 田 哲男 （17) 
IV と 比べ る と 操作 性が よ く な つ た こ のゲー 
ム， 英語の 勉強と 根気 を 養う のに はもって こい。 
さすが 5 作 も 出して いる だけあって， 話の 作 
り は 天下一品。 解き 終わる の はきつ とま だま 
だ 先 だろ うけ ど， 終わつ た と き の 満足感 は ひ 
と し おで しょう。 

X6B000 用 5"2HD 版 2 枚 組 3. 800 円 （税別） 
ポニ一 キヤ 二 オン S03(221)3161 



A 


SX- WINDOW 


► こ れ から どのように アプリケーションが 発 
展 する のか， 楽しみ。 6, 800 円 は超激 安！ 

東京都. 瓶 子 卓 也 (33) 
► 1M なのです ぐ 赤旗が 立って しまう。 電源 
を 切る 時の 絵が 気に入って いるので， それで 
もい いのです。 兵庫県 • 木 村 健 二 (25) 
► あ れで 6, 800 1'] はう ますぎ る！ 欲 をい え 
ば もっと アプリが 入って いると うれしい。 自 
分で も アプリ を 作りたい ので， 今後に 期待し 
ます。 静岡県 • 野 村 一洋 （24) 

► Mac の ウィンドウ システムよ り センス 力' ； 
よい。 X68000 の 基本 システム となると 思う。 

福岡识 • 國藤 恭正 （38) 
発売した 途端にす ごい 反響。 皆さん 気に入 
つて くれたよ うです ね。 これからの X68000 
を 担 う ウィンドウ システム といえるでしょう。 

X68000 用 5"2HD 版 6,800 円 （税別） 

シャープ S03(260) 1 1 61 
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ン アップした。 思考 ルーチンが 強化され， 「強 知 
能 版」 と銘 うっての 登場。 もちろん 今まで どおり， 
自己 成長 型 サンプリング 機能と， 推論 型 人工知能 
の 搭載に よって， 打って いくたびに 次第に 個性 を 
身に つけ， さらに 強くな つて プレイヤ一 に 挑戦し 
てく る。 麻雀 そのもの を 楽しみたい 硬派な 人， も 
し く は 友達に 負け っぱなし だから， 腕 を 磨きたい 
つて 人に お薦め。 

X68000 用 5"2HD 版 1 枚 組 9， 800 円 

ビクター 音楽 産業 S03(423)790l 

★ PIPYAN 

LIFRAIM に 続く， M.N.M. Software のパズ ル ゲ ― 
ム。 

大規模な パイプ 工場に 突然 隕石が 落下， パイプ 
に 磁力が 発生す ると いう ァ クシ デン 卜に 見舞われ, 
工場 は 壊 減 状態。 残された 手立て は パイプ を リン 
グ 状に つなぎ合わせる 二と。 工場の 中 を 走り回つ 
て， 散らばつ ている パイプ をリ ング 状に つなぎ 合 
わせ 工場 を 救え ！ 制限時間 もあって なかなか シ 
ビアな ゲーム。 面 セレク 卜が 可能な ノーマル モ一 
ドと， 自分の 行動が 記録され て あとから 研究で き 
る エントリ 一モードが ある。 お好きな ほうから ど 
ぅぞ。 

X68000 用 5"2HD 版 6, 200 円 

ブ ラザー 工業 0052(824)2493 

★ FSS シナリ 才 Vol.l ぺ ルセ ウスの 冒険 

FSS (ファンタジー サ一ガ システム） は 横スク 
ロールの RPG。 ストーリ一 は， ギリシャ 神話の 


' 'ペル セ ウスの 冒険'' を モチーフに している。 母 
ダナエ一 をポ リ ュデ イク テ一ス 王から 救う ため， 
ゴ ルゴ ン 討伐の 旅に 出る ペル セ ウス。 その 前途に 
待ち受ける もの は 何 か ？' 

同社の アルガ一 ナ によく 似た タイプで， とつつ 
きやす く 気軽に 遊べる ゲーム だ。 
X68000 用 5"2HD 版 2 枚 組 6, 800 円 

M.N.M. Software ©0423 (60) 3084 

★ Vessel 

M.N.M.Software 開発の， 日本で はち よつ と 珍し 
い 本格 テキス トァ ド ベン チヤ一 が 登場。 今にも 難 
破しょう としてい る 船 を 舞台に， 君 は 乗員 '乗客 
を すみやかに 退避 させな ければ な ら な い。 極限 状 
態に おける 人間の 道徳， 倫理 を 問う ス トー リーが 
君 を 待って いる。 数々 の 質問に キミ はどう 答える 
か？ 

500 ページ を 超える 莫大な テキスト 量で， ゲ一 
ムブッ ク の感 党で 楽 しめる ぞ。 

X68000 用 5"2HD 版 5, 000 円 

ブラ ザ一 工業 な052 (824) 2493 

★ シ ムシ ティ 一 

去年 ァメ リカで 旋風 を卷き 起こ した リ アルタイ 
ムシ ミュレ一 ショ ン ゲームが X68000 に 登場。 1900 
年から スタートし， ブレイ ヤーが 市長と なって 町 
の 行政 を 担当 するとい う もの だ。 好き勝手に 家 を 
建てる だけで はなく， 住民の 要望に 合わせて 鉄道 
を 敷いたり スタジアム を 建てたり などして， 住み 
よい 町づく り を 進めて いかなければ ならない。 


災害， 公害， 交通， 税率な どの 幾多の 困難 を 乗 
り 越えて， 目指す は 人口 25 万の 超 巨大 都市， メガ 
口 ポリス だ。 
X68000 用 5"2HD 版 9， 800 円 

イマ ジニァ Q03(343)89l I 

★ ァク シス 

あの， ファイナル ゾーンの ハワード. ポ ウイ 大 
尉が 帰って くる ぞ。 この ァク シス は， 人 型 機動 兵 
器 を 操作す る アクション ゲーム。 X68000 専用 仕 
様で， 斜め 上からの 視点に より， 立体的な 画面 を 
かもし 出して いるの がゥリ だ。 スクロール 速度 も 
可変と いうから， 気持ちいい アクションが 楽しめ 
そう。 キャラクタ一 デザインに 美樹本 春彦を 迎え 
ている。 

X68000 用 5"2HD 版 8, 800 円 

ウルフ • チーム 003(5273)4795 
女ぴ くせる 君 

M.N.M.Software の スプラ ィ 卜 パターン 開発 ッ一 
ルが 市販 される ことにな つた。 

キャラクタの 大きさ は 最大 128X128 ドット， 65 
536 色 中 16 色まで 使用で きる。 回転， 反転， パレ 
ッ ト 賙整 機能な ど 必要な もの は ひと 通り そろって 
いる。 同社 開発の ゲ一厶 はすべ てこの ツールで 作 
つてい ると いうから， 性能の ほど はう かがえ るよ 
ね。 スプ ライト 定義の サンプル など を 添付して 4， 
800 円と いう 価格 もうれ しい。 

X68000 用 5"2HD 版 4, 800 円 

ブ ラザー 工業 S052(824)2493 
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新製品 紹介 


X68000 の 周辺 «8 ソフ HSR レポート 


ビデオ ボード CZ- 阳 VI 

C compiler PRO-68K verS.O 

|< 口一 イング 系 グラフィック ツール 


dX-WINDOWvcrJ.O 


先 ごろ 発売され た ビデオ ボー ドゃ 発売が 待 

たれる XC の ver2.0 な ど を 中心に X68000 
の 周辺 事情の 近況 を レポ 一 ト してみ よ う。 

4 年 目 を 迎えた X68000 シ リ ーズは 今年 
も , PROII/EXPERTII/SUPER - HD な ど 
の 新 機種 を 加え 着実な 歩み を 見せて いる。 
また， 5 月 -ゆの 新製品 紹介で お 知 ら せした 
光磁気 デ イス ク ドライ ブな どの 周辺機器 も 
期待の 的と なって いる。 ここで， すでに 発 
売に なった もの， それに 間もなく 発売され 
る ものに ついての 情報 を ま とめて おこう。 
全体に 発売が 遅れて いる ものが 多い よ うだ 
が, まあ， X68000 も 10 万 台 を 超えた こと だ 
し， ここ は ひとつ 長い 目で 侍って あげよう。 

まず， 本体。 PRO II と EXPERTII は 順調 
に 出荷され ている 力 ? ， SUPER-HD につい 
て は 6 月に 発売 と な つ た も のの 生 產: 体制が 
追いつかず # ごろから 予約して いた 人 は 結 
構ャキ モキ した こと た' ろ う 。 そ の 後 品薄 状 
態 は徐々 に 改善され ている よう だから， い 
まから 買おう と 思う 人 は それほど 心配す る 
こと はない はず。 まず は ひと 安心と いった 
ところた"。 

次に 周辺 機 Sfiy 係。 ビデオ ボー ドが 7 月 
10 日より 発売と なって おり， これにつ いて 
は あとで も う 少し 詳し く 紹介す る 力 f , SCSI 

ボードと 光磁気 ディ スク について はと り あ 
え ず 秋 以降 と 考えて おいた ほうがよ さそう 

だ。 

そして， ソフト。 新 シリーズより 標準で 

ついて く る SX- WINDOW が 単体で? § 売 さ 
れた。 これまでの 流れ を 簡単に 整理す ると， 
ま ず PRO II /EXPERT II の シリーズに 標 


準で ついて きた もの， SUPER- HD に同梱 
されて いる SCSI 対応の もの， そして 今回 市 
販 された もの， というよ うに 3 つの バ一ジ 
ヨンが ある。 市販 バージョン では SCSI 対応 
となつ た ほか 細か t 、 点で 若 千の デバ ッ グが 
なされて いるよう で， 以後 はこの バ 一ジョ 
ンが各 製品に も同梱 されて いる。 シャープ 
では 初期の 製品に 同梱 された ものに ついて 
は， バージョンアップ サービス を 行う そう 
で， 詳しい こと は 直接 シャープの ほうに 問 
い 合わせて ほしい とのこ とた'。 

また， バージョンアップの 声 を 閒 いて 久 

し !• 、 XC だ 力 f , 現在 マニュアル な ど の 最終 段 

階に 入って おり， 9 月に 発売で きる 目処が 
ついて るら しい。 

さて， SX-WINDOW や XC は 大き な 目玉 
だ 力 f ， アプリケーションの ほう も， 通信 ソ 
フトの Communication PRO-68K が 
ver2.0 となって 発売され た ほ 力'， 新しく ド 
ローイ ング 系の グラ フィック ツール 力 f シャ 
ープ ブランドで 近日 発売の 予定。 期 侍した 
い。 それから， MultiWord と 力' いう ワープ 
ロソフ トが 予定され ている はずな の だが， 
その後 情報がない。 どうしたんだろう。 

ビ ガ ボード CZ-6BV1 

ビデオ ホ' 一 ドは コンピュータ 画像 を ビデ 

才 信号に 変換す る 周 辺 機器 だ。 X68000 ！ 二 は 
当初から 力 ラーイ メージ ュニッ 卜と いう 外 
付けの 周辺 機 S が あ り ， こ れを 利用 すれば 
ビデオ 信号 を 取り出す ことができた。 しか 
し， カラー イメージ ユニット は， ビデオ 機 
器 か ら 映像 を 取 り 込んだ り （デジ タ ィ ズ機 



ビデオ ポー ド （ON) 

ビデオ ポー ド （OFF) 

モニタ 表示 

ビデオ 出力 

モニタ^^ 

ビデオ 出力 

コンピュータ モード 

コンピュータ M 象 

コンピュータ 画像 

コンビ ュ一タ 画像 

停止 

スーパ一 ィ ン ポーズ 
モード 

(專用 ディ ス プレイ 
テレヒ *) 

スーパ一 インポ 一 
ス雨 

(コンピュータ 画 
面 は 流れる） 

コンピュータ 画像 

コンピュータ 画像 
が 出力され テレ 
ビ との スーパ一 ィ 
ン ポーズ 

停止 

テレビ モード 
(専用 ディスプレイ 

テレヒ 0 

テレビ^ 

コンピュータ 画 ザ 象 

テレビ^ 

停止 


-^^ 


能）， ビデオに コンピュータ 画像 を 合成した 
スーパー ィ ン ポーズ 画面 を ビデオ 信号に し 
たり （テロップ 機能） する のが 主な 目的で 

価格 も 69,800 円と かな り 高価な 機器と なつ 
ている。 

ところが 最近 は， 特に ビデオ 編集 を 目的 
としてい る わけで なくと も， 大型 テレビで 
アクション ゲーム を 楽しんだり， それ をビ 
デ才に 録画したり， あるいは コンピュータ 
で 長編 ァ 二 メーシ ヨン を 作る のに ビデオ を 
利用 したいと いつ た 要望が 強 くな つてき た。 
そ こ で， 登場 し た のが 単に ビデオ 信号 を 得 
る だけの 機能に 絞つ た ビデオ ボー ド という 
わけ だ。 

基本的 に ビデオ 信号 に 変換で きる の は， 
15kHz の 低 解像度 モー ドの 場合に 限られて 
いる。 ゲーム ソフトで も アフター バーナー 
な ど 低 解像度 モー ドの もの は 大丈夫 だが ポ 
ピュ ラスな ど, Si 解像度 モー ド のソフ トはそ 
のままで は ビデオ 信号に は 落とせな いやで 
注意が 必要 だ。 

ボー ド を 接続し た 状態で， 試しに ゲーム 
ソ フ 卜の ワール ドコー ト を 立ち上げて みた 
ところ， ビデオ 信号なら ではの ギラ つきと 
多少の 色の 違い は ある ものの， まあまあ 質 
の 高い 画像 を 得る こ とがで きた。 起 勛後デ 
ィ ス プレイ が は kHz に 切 り 替わった と こ 
ろで 初めて ビデオ 画面に 表示され た 力、 こ 
れは コンピュータ が 高 解像度の 場合に は ビ 
デォ 出力 は 自勅 的に 停止す るよう になって 
いるた めだ。 見苦しい 画面 を 見せない ため 
の 配 處 だろう 力'。 なお， ビデオ ボードの 動 
作 スィッチ を OFF にす ると， ビデオ 出力 は 
停止 し 本体からの 出力 は そのまま ボード を 

表 2 ビデオ ボード （CZ-6BV1 の 主な 仕様） 


入出力^ ^ 

アナログ RGB/ テ レビ コント ロール 

コンポ ジッ ト ビデオ 出力/ SB 央像 出力 

使用 LSI 

CXA 1 1 45P (NTSCX ンコ一 50 
CXAI2I5M (同 M 言^^) 

ビデ 才 出力 

ビデオ ポー ド 動作 スィ ツチて mu: 可能 

高 J# ^度 モー ド時は 出力 を 停止 

電源 

+ 5 V 

■H2V (コンピュータ 本体よ りま始 J 

外形 寸法 

1 50mm (W) x 1 53mm (D) X 35mm (H) 

小. 

260g 


1 ト 35°C (^i^-25—55 , C) 
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素通りす る。 詳細 は 表 1 を ご覧いた だきた 

い 0 

用途が 用途 だけに 使い方 は 簡単 だが， ち 
よつ と 変わって いるの は 接続の しかた。 外 
部への 各 信号 は ボード 端の コネクタから 取 
るの はいう まで もない 力 5 ， ボード を 拡張 ス 
ロットに 差し込む だけでなく， 写真の よう 

に ボー ド 内から 出て いる RGB ケー ブル と 
テ レ ビコ ン ト ロール ケーブル を 本体の コ ネ 
クタに もつな がな く て はならない。 

ここでち よ つ と 悲し いのは ケーブル ゃコ 
ネ クタが かさばる ために スロ ッ ト を 2 つ 分 
占有して しまう こと だ。 ゲーム を 録画す る 
だけの 入に はいい かも しれない 力 5 ， グラ フ 
ィ ッ クで アニメ ーショ ンを という 人なら メ 
モ リ の 増設 や 数値 演算 ボー ド など も 考える 
はず。 では， なぜ こ ういう ボー ド のかた ち 
にした かとい うと， やはり コスト を 抑える 
ためだろ う 。 外部 ュニ ット にす ると 電源 や 
ケース で 値段が 上がつ てし まう （実際 I/O 
から は 電源 を 取って いる だけの よう だ 力り 。 
このへん も 力 ラーイ メ一ジ ュニッ トが 買え 
ない 人の ためと いうと こ ろ だろ う 力'。 

こ の ビデオ ボー ドには 通常の コンポ ジ ッ 
ト ビデオ 出力 に 加 えて S 映像 出 力 も 備えて 
おり， S 端子の ついた ビデオ 機器の 場合 は 

より 美しい 画像 を 楽しむ ことができる。 ま 
た， カラー ィメー ジュニ ッ ト では ス 一 パー 
インポ 一 ズ 画面 を ビデオ 信号に 変換す る の 

が 基本で， 単に ビデオ に 録画す る だけで も 
ビデオ 信号 を 外部から 取る 必要が あ つ たが， 

こ の ビデオ ボー ド では 必要な い。 21, 000 円 
と 求め やすい 価格と なって いるので， 目的 
の はつ き り している 人に はお 得な 買い物と 
なる だろう。 


C comDile「 PRO-68K ver2.0 


C compiler PRO- 68K (通称 XC) は， 
X68000 の 開発 環境の 中核 をな す 重要な セ 
ッ ト である。 アセンブラ と して， C コン ノぐィ 
ラ として， さらに は BASIC コンパ ィ ラ とし 
て も 使え， X68000 の ユニークで 強力な ハー 
ドウ エア を カバーす る プログラマに とって 
必携の 開発 セ ット といえるだろう。 

今回の バー ジョ ン アップの 内容 は， XC の 

高速 化に 加えて， ソースコード デバッガ を 

新たに 用意， さ ら に， ANSI 規格への 準拠 を 
進める， Human68k ver2.0 で 拡張され た 
DOS コールの サポート， 各種 ツール も 強 
化， といった もの だ。 マニュアル もさら に 
増え， あまりの 重さに パッケージに は 取つ 
手まで つく ことにな つたと いう。 
セット の 内容 は， 


C コンパ ィ ラ 
BASIC — C コン' 


リ ンカ 

デバッガ 

アーカイバ 
および， 新たに 追加され た， 

ソースコード デバッガ 

ライブラリアン 

プログラム 保守 ユー ティ リ テ 
ィ （MAKE) 
などと なって いる。 

ソースコード デバッガ は， ソ 
ース レベルでの デバッグ を 可能 
にす る もの。 フル スクリーン モ 
ード （マウス 表示 画面 を 利用） 
で デバ ッ グ中 に C 言語の ソース 
プログラム を 行 単位で 実行 さ せ 
る こ とがで き る ほ 力'， C 言語で 

宣言 さ れた 変数の 参照お よ び 変更な ど も 可 
能との こと。 

また， ライブラリアン は 複数の 才 ブ' y ェ 
ク ト ファイル を 種類 ごとに ま とめて 管理す 

る ツール。 X68000 の ハー ドをサ ポー 卜する 
豊富な ルーチン （800 種 以上） を ライブラリ 
と して 高速に リンクで きる という もの。 

詳しい こと は 次号で お 送 り する 予定 だが 
いちばん 気になる の は 旧 バージョンの ユー 
ザ 一^ "の 対応だろう。 基本的に は 登録 カー 
ド を 返送 している ユーザー に は 案内状が 送 
られ るそう だ。 マニュアル も 新規の ものと 
な る ので 費用が ど の 程度に なる 力' はま だ 未 
定だ。 

KD —系 グラフ イク ツール 



"IIP 



，i 

用の Adobe Illustrator な ど が 有名 だが， ど 
うやら 今回の ツール は それら を 意識した も 
のらし い。 ドロー 系の ツールの 特長 は， ぺ 
ィ ン ト 系の ツールの よ う に VRAM 上に デ 
. ータを 書き込む こ とで 画像と する ので はな 
く， べクト ル 情報 か ら なる ォ プジヱ ク ト を 
組み合わせて 絵 を 作る という もの だ。 

なにが いい かとい う と，' 一度 描いた 絵 を, 
再度 編集 し 直したり する こと が 容易 となる。 
ま た， 画面 上で は ド ッ ト 数の 制約 を 受け る 
ものの， プリントアウト するとず つと 解 像 
度の 高い なめらかな 絵 を 作成で き るの だ。 

まだ 商品名が 決まって いないので， ここ 
では 仮に X-DRAW とで もして おこう。 こ 
の X-DRAW は， ドロー セル， ペイン トセ 
ノレ， テキスト セルと いう 3 つの セル を 持つ 
ており， ドロー セルと テキスト セル は それ 
ぞ れべク ト ル 情報に よる ォ ブジエ ク ト を 扱 
い， ペイン トセ ル では ビ ット マツ プデー タ 
を 扱う ことができる。 これら を 重ね合わせ 
て ひ とつの 絵 を 表示す る わ けだ。 

といっても， まだ ピンと こない かもしれ 
ない 力 5 , 詳しい こと は 次号で 紹介す る 予定 
なので ぜひと も 期待して ほしい。 



ドロ一 セル を リアル モ一 ド にして 表示 
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先月の 「あなたに あった グラフィック ッ 
—ル」 の 最後で， 奇 しく も获窪 氏が 「ドロ 
ーィ ング 系の グラフ ィ ック ツールがない」 
と 指摘した ばかり だ 力 ? ， 実は この 秋， ある 
ドロ一 ィ ング ツールが シャープ さんから 発 
壳 される こと になって いたのた ％ 

ドロ一 系 ソフトと いえ ば， Macintosh II 


-. . . .rt-f . f- t jif. j^. — 


オブジェ ク ト を スケル | 
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ついに 10 万 台 を 達成した X680DD。 だが， 
その X68000 が 次の 一歩 を 踏み出す ために 
はどラ しても 欠かせない 問題が ある。 それ 
は 「大人で も 楽しめる パーソナル ユース j 
の 概念 だ。 単に ビジネス ソフ 卜が 揃う こと 
だけでなく， ユーザーの 意識 も 重要 だ そ。 


1987 年 春の 発売 以来， X68000 の 歴史 も 丸 
3 年を越え た。 300 万 台と もい われる PC- 
9801 でさ え ゲーム ソフト は 1 万 本 売れれば 
ヒット だとい われる この 業界で， その 30 分 
の 1 の 10 万 台 達成 マシン X68000 では 1 万 
本 を 越える ヒット 作が スぺ ハリ， ジ エノ サ 
イド， ダン ジョン マスター などい 〈つも 登 
場し， 傲慢な 日本の 善良な 市民 （一応い つ 
てお く 力す， 私が "善良な 市民" というと き 
は 100% 皮肉で ある） を 驚かせた。 

PC - 9801 も 300 万 台のう ち VM 以前の 買 
い 換えられた 可能性の 高い 古い 機種 や 企業 
に 大量 導入 した 事務機器 を 除いた パー ソナ 
ルな 現場 （笑） で 現役して いる 機械 は 100 
万 台 未満 だ と 思われる が， そ れで も 10 万 台 
より は 遥かに 多い はず だ。 ゲーム ユーザー 
の X68000 にかけ る 気合い は あな どれない。 
し 力' し， その 一方で X68000 は ゲームと 
グラフィックの マシン だとい う 評判 も 定着 
してし まった （誰が したの かさせた のか）。 
そうなる と 誰が 困る かとい う と ，X68000 
で いろんな こ と をしたい と 考えて いる ユー 
ザ 一と 私で ある。 「どうも ゲームた' の レイ 
ト レー シン グ だの CGA だの プロ グラ ミ ン 
グ だの 賑やかな 話ば かりだ， と。 どれ も 好 
きで なきや やれん ような もんばつ かや。 ヮ 
一 プロ や 表 計算し よ 思たら， やつ ぱ 98 にせ 
な あかん かの お」 という 付和雷同 ヮ ール ド 
に 腰 を 落ち着けて しまう かも しれない。 実 
際， そういう 人 も 多い。 

で， 「大人の ための X68000」 である。 こ 
れは X68000 が これ か ら メジャー になって 
い く 過程に おいて 避けて 通れない 問題な の 
だ。 でも，" 大人" つてい うのが 問)！ なんだ 
な。 新しく 連載 やる よってい つたら r ァダ 
ルト ソフトの コーナーで すか？ j なんて ボ 
ケる やつ は 論外と して （質の いい アダルト 
ソフトが あれば やりたい けど）， 実務 ソフ 
トを 使った 事務機器と しての パソコン を 思 
い 浮かべる 人が 大勢な ので はないだ ろ う か。 
しかし， 私 は 事務機器に 成 り 下がつ たパ 
ソコン なんて 大嫌いで ある。 誰が なんとい 
つても， 嫌いで ある。 企業な り 個人 商店な 


りが 目的 を 持って 買った， つまり 必要 経费 
と し て 控除の 対象にな る-機械な ら ともかく， 
せっかく 個 入で; つたの な ら それな り に 面 
白く 使わなければ 意味がない， と 思う の だ。 
でしよ でしよ。 それでもって， いまの X68 
000 は "面白いだ けの パソコン" になり 力' 
ねない 風潮が ある。 それ もまた よくない。 

いちばん 重要な もの 

そこで， 「大人の た め の X68000」 で は 
何 をす る 力'， というと， 基本 は アプリ ケー 
シ ヨン ソフト を 使った データの ^ 理 である。 
あるいは ビジネス ソフト で 遊ぶ， ことで あ 
る。 データと いっても グラフィック や PC 
M や MML ではなく， 文字列 や 数値 だ。 

余談 だが， 瑰 解って いる 入 は 判って いる 
とおり， すべての コンピュータに とって ど 
んな データ も （プログラムなん かも 含めて） 
等価で あ . る 。 単 な る ビ ッ ト の 羅列 をい ろい 
ろと 区別して いるの は 人間 だ。 X68000 は 
すべての データ は 等価 だ という こと を 認識 
させて く れる 希有な パソコン である。 

た と え ば 辞書 データで あ る 力、 そ の 膨大 
な ファイル を "PCM ファイル" とみな せば 
"COPY X68K_M.DIC PCM" でち やん 
とノィ ジ 一な 前 術 音楽 を 披露して く れる し， 
幽 像デー タ だとみ な せ ば BASIC の IMG - 
LOAD コ マン ドゃ 一部の 人 は 待って いる 
GL コ マン ドで l!!f| 面 上に 意味 深な 楔 様 を 描 
き 出 して くれる。 辞書で な く て も， COMM 
AND. X を 鳴 らしたり 画像に し た り も 簡単 
た'。 すべての フ アイ ル は 等価で あ る 。 余談 終 
わり。 

コンピュータ を 扱う う えで いちばん 大切 
にしなければ な ら ない もの は 何 か。 それ は 
ハードウェア でも ソフトウェア でもな く， 
溜め込んだ データで ある。 実のと こ ろ，' デ 
ータ さえし かるべき ところでし かるべき 力 
を 発揮して くれれば， どんな マシンで も 
( PC— 9801 で も PS/55Z で も） どんな ソフ 
ト でも （ Lotus 卜 2- 3 で も dBASE III で 
も） かまわな いの だ。 


基本コンセプト はこれ である。 データの 
共有。 一度 打ち込んだ データ は 二度と 打ち 
直さない ぞ。 つてな もんだ。 

あらゆる 文字列 化， 数値 化さ れた データ 
を 扱う こと。 大袈裟の 大風呂敷の ドン • キ 
ホー テ ないい 方 を すれば， これが r 大人の 
ための X68000j の 第 1 の テーマで ある。 

都合の いい こ と に MS-DOS の 5 ィ ンチ 2 
HD ディ スク と X68000 の Human68k のフ 
アイ ルには 互換性が ある。 さらに 都合の い 
いこと に， X68000 では CSV 形式と いう 
けつ こ う 共通に 使える データ フォー マ ッ ト 
が ある。 この 形式で 記述され た ファイル は 
MS - DOS の いろんな ソフ ト でも 扱える。 

という わけで， 今月 は 第 0 回と いう こと 
で， いまい つた ファイル 互換の 問題と CS 
V 形式の データ フォー マ ッ ト についての 基 
礎 知識 を ォマケ として 記して おきたい。 

もっと 複雑な データ （グラフ や 装飾 付きの 
データ や 計算 式 付きの データな ど） につい 
て はと り あえず 考えない。 考え出す と， 現 
状の 悲 し さ を 身体 一杯で 表現す る ことにな 
る だけ だから だ。 

ファイルの 互換性に ついて 

世の MS- DOS マシンで 使われて いる デ 
ィ スク は， 現在の と こ ろ 3.5 ィ ンチ と 5.25 ィ 
ンチの 2DD と 2HD だと 考えて よ い。 こ こで 
問題 になる の は， 2DD にも 2HD にも 2 種類 
ある こと だ。 日 本の MS— DOS マ シ ン では 2 
DD は 640KB, 2HD は 1 .2MB の 容量 に な る 
ような フォーマット を 採用して いる 力、 I 
BM-PC コンパチ マシン は 2DD は 720KB, 
2HD は 1.44MB の フォー マツ ト なの だ。 2D 
D に関して は どっちの フォー マツ ト でも 読 
み 書きで き るよう になって いるので 問題 は 
ない が, 2HD に関して は （特に 5 ィ ンチ は） 
互いに 読み書き できる マシン は 少ない。 後者 
は 2HC な ど と 呼ばれる こと も ある。 X68000 
は 当然 5.25 ィ ンチの 1. 2MB タ ィ プ である。 

つまり， X68000 のデ イス ク ドライ ブで読 
み 書きで きる の は 日 本の MS - DOS マ シンの 
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5 インチ 2HD テ" ィ スク という ことになる。 
逆 も 真な り で， X68000 の Human68k のデ 
イス クは 5 ィ ンチ 2HD ドライブ を 持った 
MS- DOS 上で は ディ レクト リを 見たり 
フ アイ ルを エディ ット したりで きる わ けだ。 

ただし， MS - DOS では H u m a n68k にで き 
るのに でき ない 2 つの ファイル 名 制限が ある。 

ひとつ は， 英小文字の ファイル 名 は 扱え 
ない こ と。 

もう ひとつ は， ファイル 名 8 文字， 拡張 
子 3 文字し か 扱えない こ とで ある。 

前者 は， MS- DOS で DIR すると 小文字 
のフ アイ ル 名が 見える のに 扱えない といつ 
た， 歯ぎ しり ぎりぎり である。 私 も 卒論の 
下書き を X68000 で 書いて， 学校の PC - 9801 
で 打ち出そう としたら， ファイル 名が 小 文 
字で 駄目 だつ たという 無駄な 1 日 を 過ごし 
た ことがある。 そ 一い えば さっき も Kami 
kaze で 作つ たフ アイ ルを Lotus 1 - 2 - 3 で 読 
ませよう として 同じ 目にあった。 人間， な 
かな か 成長し ない ものである。 

後者 は たいし た 問題で は ない。 X68000 
上で " OHX8 ガッ ゴゥ .TXT " という ファ 
ィルを 作つ て MS-DOS 上で 読む と ， "OHX 
8 ガッ コ .TXT" となる だけ だか ら だ。 

な ん と か X68000 と PC - 9801 で 同 じ デー 
タが 扱え る こ とがわかった わけで， めでた 
い。 大人 は 寛大な ので， PC- 9801 とだつ 
て 手 を 組んだ り 利 用 し た り す る ので あ る 。 

あと は シャープ かサ一 ド パー ティが 安く 
て 小型な 3. 5 ィ ンチ 外付け ォー ト ィ ジェ ク 
ト ドライブ を 出して く れれば もっと 完璧 
(間違った 日本語） である。 

CSV 形式に ついて 

CSV 形式 と い うの は Kamikaze や CAR 
D PRO-68K, CYBERNOTE PRO-68K 
な ど で 読み 書 きで きる デ一 タ 記述の 方法 
である。 Stationery PRO— 68K に 至って 
は， 初めから CSV 形式で データ を 持って 
いる。 MS— DOS マシンで も dBASE などで 
使用可能 である。 ちなみに CSV は Comm 
a Separated Value (カンマで 区切った 
値） の咯 であり， 標準 形式， DIF 形式な ど 
と も いわれて いる。 

具体的に は， 1 つ ひとつの 項目 を カンマ 
で 区切り， ひとつの レコード を 復帰 改行 
「CR + LF」 で 区切って 記述す る 方法。 
項目が 文字列で あれば， ダブル クオ ーテ一 
シ ヨン 「 " 」 で 囲 む。 数値 は そのまま。 
なんてい つても わかんない 人に は ピン と こ 
ないだ ろ う から 例 を 挙げてお こ う。 

なお， Kamikaze の CSV 形式と， CAR 


D PRO - 68K (およ び CYBERNOTE P 
RO-68 K ) の CSV 形 式 は 微妙 に 違って た 
りする。 「Kamikaze は 空欄 （データの な 
い 項目.） について は カンマ だけで 処理して 
い る が （例 ： "A",„"B" ) CYBERNOT 
E PRO-68K では 空欄 も"" と している 
(例 ： "a"，""，""，"B" ) の だ。 それでも， 
；§： いに ファイル を やり と りする 際に は 困ら 
ない。 

世界で 1000 万 本 普及 している という Lot 
us 1-2-3 であるが， テキスト 読み込み とい 
う 形で CSV に 似た ファイル を 読む こ と が 

できる。 ただし， 「カンマ を 項目の 区切り 
として 認識し ない」 ため， ヌルの 項目 もダ 
ブル クオ 一 テーシ ヨンで く く る 必要が あ 

る （""のこと）。 そんなと き は CARD PR 
0- 68K の 方式が 便利で あ る 。 

データの 共用 を 目指' した 書式に は, ほか 
にも SYLK 形式 （マルチ プラン 用） ，ASC 
II 形式 （区 W りなし）， ASCII 形式 （区切 
り あり）， な ど が ある。 X68000 の 場合， S 
YLK は K amikaze で， ASCII 形式 は CA 
RD PRO"68K で サポ一 卜して いる。 

SYLK 形式 は 1 つ ひとつの 項目に 対し 
て 座標が 入った り 数式な ども 入れら れ るた 
め 多く の 情報が 表現で き る。 表 計算に 限れ 
ば 有利 だ。 

ASCII 形式の 区切 りなし という の は， 
項目 を 区切る 区切り 文字 （カンマな ど） が 
なくて， 1 レコード を 1 行と して 出力す る 
方式。 余計な 文字が 入らない ので， ワープ 
口な どに 読み出す のに は 便利。 各項 目が 何 
桁 あるかが わかって いれば， 区切り 文字 は 
なくても なん とかなる ものである。 

ASCII 形式の 区切り あり というの は， 項 
U ご と に 復帰 改行 （CR + LF) してる 形式。 

これらの データ を 格納す る 方式 はあく ま 
で も 「興な る ソフト 間で データ を や り と り 
図 1 さまざまな テキス 卜 形式 


する」 のが 目的な のであって， たいていの 
ソ フ ト は 独自の 形式で データ を 管理して い 
る。 と， いう こと は， 「コ ン バー ト」 とい 
う 作業が 必要になる わけで ある。 使って い 
る ソフトの ネィ ティ ブな 格納 形式の データ 
を， 汎用 的な テキスト データに コンバート 
する， あるいは その 逆 だ。 そのこと を 忘れ 
て はならない。 

； ^にも 親切に 

まあ， 今回 は ご 挨拶 と 予備知識 だか ら こ 
んな もんかな。 来 S から は 毎回 具体的な 
テーマ を 選んで 話 を 進めよう。 パソコン 初 
心 者の 人 も 対象に する ので， 簡単な 話から 
始める。 若い 初心者に は 「苦労した だけ 身 
になる の だから， 自分の 道 は 自分で 1JJ り 開 
こう。 頭 を 使って こそ 入 間 だ あ」 なんて 
い 一加減な こ と をい つて 済ます こ と もで き 
る の だが （昔 は それ を 「Oh ！ MZ は ド ラ ゴ 
ン である j などと いって 正当化し ていた）， 
大人にまで そんな こ と は 要求 しないので， 
私 はわが ままな 自分に 鞭打って， 惯れ ない 
ことと は 知りつつ も， 親切に 書く つもりで 
ある。 

まあ， 大人なん ていっても， r 日本 は 子 
供 社会 だ」 なんて 断言す る 人が いる く らい 
な もんで， 年齢なん て 気にしな いでね。 大 
人の 定義なん て ど 一 あがいて も 言葉 遊びに 
しかなん ないし。 まあ， 大人 は 「謙虚」 だ, 
とで も， いってお こうか （私が いっても 説 
得 力がない か も しらん 力り。 
* 

来月 は 第 1 回と して， "一度 打ち込んだ 
データ は 二度 と 手放さ ない ぞ" の 精神に よ 
る 住所録 談話で もして みようかと 思う （陳 
腐な ネタで 悪かった わね。 でも， '；凡 ffl 性が 
高い から 便利で いいの さ）。 


CSV 形式 1 

"Oh!X«K«|i" ,"0S^48M309" , " J(tK8f8K *tS","ljr i よ 一ん'' "引う 越したん だ よん", 
"Oh!~«ftSli" …一 

CSV 形式 2 (とにかく" で 囲む） 

"Oh!X 篇 "03-5^8-1309","* 京都 港 区 高 tt"," ぼよ よ一 ん 引っ越したん だ よん"，"" 
"Oh! — 編! ft 部" …… 

ASCII 形式 I (区切りな し） 

OhiXWmSi 03 - 5488-1309 If よよ 一ん 引っ越し たんだ よん 

Oh!-«»« ―… 

(第】 フィールド ： 11 桁， 第 2 フィールド： 14 桁 一… の 1# 合） 

ASCII 形式 2 (区切り あり） 
OWXWft 部 

03-5488-1309 

ぼよ よ —ん 


'JI つ 越したん だ よん * データべ一 ス ソフトから 変換した とき はた 
Oh! — tt* 部 いてい 空白 部分 も 項目の 桁 B だけ スペースで 
埋められ 4, 
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R 


A 


M 


M 


N 


G 


清水 和 ASfE 

ブ ログ ラミン ク道 i 


〔その 1〕 


アマ グラマに 花道 を 


ゲーム ハイテク 道場， FORTH 入門な ど 数々 の 名作 を 生んだ， あの 清水 和 
人さん ガ 帰って きました。 いや〜 お 帰ん なさい。 またまた ユニークな 記事 を 
Shimizu Kazuto お願いしますよ。 てな もんで 初心者の 皆さん， この 講座 は 要 チェックで すよ。 


アマ グラマの すすめ 

r 人間 は 考える 葦で ある j 

しかし 最近の コンピュータの 発達に よ り， 
人間の 考えるべき こ との 多く を コンビ ユー 
タが 代わって くれる ようになった。 そのため 
人間 は 創造的な 部分， コンピュータに は 任 
せきれ ない 精神的な 部分 を 主に 担当す れば 
よくな つてき た。 すなわち， 計算 や 操り 返 
しゃ， 機械的な 単純 作業 はすべ て コンビ ュ 
ータに 任せれば いいので ある。 それ はなに 
も 何 億 もす るよう な 大型 コンピュータ， ス 
一 パー コンピュータに 限られた こ とで はな 
い。 我々 の 目の前に ある パソコン でも かな 
りの こと を 任せる こ とがで き る。 

無論， それが できる に は， いや 自由にで 

きる に は 少な く と も BASIC な どの 言語 を 
用いて プログラム を 作る 能力が 必要で あ る 。 
これ は 誰に もた やすくで きる こ とで はない。 
だから， すぐに 使える ソフトが あらかじめ 
揃ってい る ことが 重視され， そうでない コ 
ン ピュー タは， 

「ソフト なければ ただの 箱 j ？ 
など と言われて しま うので ある。 
だが パソコン 本来の 面白さ は， 自分で プ 

ログ ラム を 組み， 自分の 代用 をさせる こと 
ではないだろう 力'。 自分の 作った プロ グラ 
ムの あの 愛らし さ を 知れば， プログラムが 
組めて よかった ときつ と 思える。 それほど 
プログラミングに は 魅力が ある。 特に パソ 
コン での プログラミングに こそ 創造性， 人 
間ら しさが あるので はない かと 私 は 思って 
いる。 また プログラムに 憤れて 〈ると 先 ほ 
ど の 付録 ソ フ ト の 使用法 も グンと 応用 範囲 
が 広がって く る はず だ。 それ は 裏で ソフ ト 
が どのよう な 処理 を している かが 理解で き 
るよう になる からで ある。 こうでなくて は 
せっかく の 愛機が， 

「ソフ 卜あって もた だの 箱 j 
にな り かねないの である。 

とはいっても， 自由自在に， しかも 早く 


プログラム を 組める よ う になる に は 相当の 
時間が かか るだろう し， なにかとて つもな 
い 怪物に 戦い を 挑む よ う な 気持ちになる 人 
も いるだろう。 確かに プログラム は 奥が 深 
い。 昔 は 壳られ ている ソ フ ト と 個人の プロ 
グラム 力 はさ ほど の 差が な か つ た も の だが， 
いま 売られて いる ゲーム を 個人で 作ろう と 思 
つたら 要する 時間 は 並大抵ではないだろう。 
この 実力 差が いまひとつ やる 気になれない 
原因と なって いるので あろう。 

ィ ャァ， ソ レジ ャッ マンナイ ナァ。 プロ 
の プログラマなん てこの 際 無視して， 我々 
は アマチュアの プログラマ， 

「ァ マグラ マ」 
に 徹する のがよ いと 思いません か。 キラ ク 
ニイ キマシ ョォ。 いや もっと おおざっぱに 
考えて， やれ プログラミング 技法と 力'， プ 
ログ ラム 作法 だと 力'， データ 構造と 力'， ァ 
ルゴ リズムと 力'， そういう 業界 用語 （？） は 
ひとまず 捨てて， 何 を 作りたい か， 何が し 
たいの か， そっちの ほうに 重点 をお いて 考 
えまし ようよ。 さあ あなた も 今日から， 

「プログラム 窓際族」 

になろう では あ り ません か。 

発想 は 気まぐれに 

チ 'いぶん 大袈裟に 始めて し ま つて 内心 
r いかん！ j とド キドキ している 力 f ， 私 も 
プログラム は アマチュア だから 気にしない 
でと， さあて 何 を やろう かな あ •••••• 。 

「何 を やろ う かな …… j 
「何 を やろ う かな …'- j 
r 何 を やろう かな …… 」 
そ うです。 いちばん 大切な の は， 
r 何 を やろう かな …… 」 
なのです。 アマチュア だから， 別に 壳るソ 
フトを 作る わけ じゃあな いし， 何 を やつ 
て もい いじ やん， の 世界な の だ。 よかった 

ね。 た と えば ， 

"コンピュータと おはなし" 


いいです ねえ。 「君， 寂しい かい？」 r 大丈 
夫， でも ゲームば かりやつ てないで 本当の 
私 を さがして …… 」 
"作曲" 

そいつ あいい や。 いい 曲がで きれば 大 儲け 
でき まっせ。 

"方程式 を 解く" 
…… &%$%#! ！ ！ 

"R くなる 人工知能" 
いいけ どかな り 大変です ぞ。 

いろいろあります ねえ。 まだまだ これ は 
氷山の 一角の 一部の チヨ ッ 卜で しか ありま 
せん。 人間の 発想 は とどまる こと を 知らな 
いのです。 でも 待って くださいよ。 喜んで 
ばかり も いられません よ。 プログラム にし 
なければ なりません。 まあ アマチュア だか 
ら そんなに すごい プログラム でな くても い 
いのです。 いま 出た 発想 をす ぐに プロ ダラ 
ム に してみ ま しょう。 

リスト 1 ~ 4 がそ れ です よ。 どうです， 
ひどい もんで しょ。 これ じゃあ サギと 呼ば 
れ たって しょうがないで すよ。 工夫の かけ 
らも 見られません。 プログラム コンクール 
が あれば 最下位 間違いな しです。 

でもよ く 見て いただきたい。 なんとなく 
この 手の プログラムの ひな 型の よ うな 気が 

して こないで し よう 力'。 リスト 1 のおし やべ 

り プログラム は 「人間の 入力に 対して ある 

法則 を もって 応答す る」 という 点で 対話 プ 
ログ ラムの 本質 をつ いてお り， リスト 2 の 

作曲 は 乱数 を 用いて 音楽 を 作って いる 点で 
ある 種の 作曲 プログラムの 骨と なる 部分で 
ある。 また リスト 3 の 一次方程式 を 解 く プ 
ログ ラム は 変数 を 用いて 計算 を 行う 典型的 
な 例で あ り， リスト 4 に関して は 「あなた」 
に閱 する 知識 を コンピュータ 力 f 覚えて い く 
の だから 確かに K く なる ではない 力'。 

エツ， プロの 作る プログラム はもつ と芸 
術 的で， こんな 変な プログラム はいく ら 
組んでも ダメ だって？ いや あ そうじゃな 
いと 思う けどな あ。 どんなす ごい プロ グラ 
ム だって その 本 ® のと ころ はこの よ うなた 
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わい もない 発想なん です ね。 要は その プロ 

グラムの メ イン イベント を 60 分 3 本 勝負で 
い 〈力'， トノ レロイ ャ ノレ 力' タック' マッチ 力'， 
悪役 同士 かべ ビーフ ヱ イス を 登場させる 力'。 
その 発想の 問 題なん です よ。 

その 発想 は 実は 2 段階 あ り ます。 
そいつ は， 

「何 を やる 力'」 と 「どうやる 力'」 
です う。 

そして， アマ グラマに とって 重要な の は 
「どうやる 力.'」 ではなく 「何 を やる 力'」 な 
のです。 どのよう にして 実現して い 〈力' は 
プログラムの 技法に と ら われず ただ 思いつ 
くま まに ガム シャラ にいき ましょう。 そう 
すれば そのう ちコッ がわ かってき て 勝手に 
プロ グラ ミ ングの 実力が ついてい きます よ ヒ 
きっと …… 。 

いさな りド 演歌 

き あそれ では ひとつ 自分 を 捨てて 変な プ 
ログ ラム を 作って みょう。 実は 私 は 1 " 変な」 
というと こ ■ ろに 非常に 価値 を 感じて しま う 
ので， どうしても 「なんか 変な の」 的な も 
のにな つてし まう。 でもって ある 日 突然， 

"演歌の 歌詞 自動 発生 プロ グラム" 
というよ うな もの を とてつもなく， どうし 
よう もな く 作りた くな つてし まつ たの だか 
らしよ うがない。 

なぜ 演驮 かとい う と 結構 パターン 化して 
いて， 決まり文句が 多い ので 简単 そうだった 
からで ある。 まあ アイドル 歌謡に しても， 
ロックに しても， ニューミュージック でさ 
え もなん となく 決まり文句が あり， できない 
こと はな さ-そ う だけ ど あまりよ い 案が 浮か 
參 リス 卜 1 おはなし 


びそう もなかった。 その 点， 演歌の パター 
ン化 といえば も う これ は 完璧に して 筋金 入 
りで ある。 

いや， わかって ますよ。 本当 は， 演歌 だ 
つて 難しい こと を。 ヒット 曲の 歌詞なん か 
真面 I 三 I に 聴 く と r 流石 ！」 と 唸って しまい 
ますよ。 まあ それ は それと して 認めます け 
どね， パロディ ックに 考えた 演歌が あって 
もい いじ やない。 そこ は それ， アマチュア 
という ことで 許して もらわな いと。 

さて， ま ず 作ろ う と 思つ たか ら に は 次の 
段階 「どうやる カリ を 考えなければ ならな 
い。 こ の 場合 演歌の 歌詞の パタ ーンを どの 
よ うに プログラムす るかで ある。 最初 だか 
ら あま りす ごい こ と を 考えずに 決まった 長 
さで 決まった 構成で， 出て くる 単語 だけ 違 
えば いい じ やない， とこれ また 安易な 方向 
へ 進めば よい。 ここ で 演歌の 特性が 生 き て 
く る わけで ある。 

今回 分析して みて 本当にび つ く ら こ いた 
の は， 大部分の 演歌の 歌詞が 七五調 だつ た 
こ とだ。 著作権法の 関係 上 実際の 驮詞を 載 
せる の は 控えたい 力 f , 読者の 皆様に おかれ 
まして は， ぜひとも 知って る 演歌の 歌詞 を 
思い浮かべて いただきたい。 「オヤ ノチヲ ヒ 
ク j 「モ ッテゥ マレ タ」 「サケ ハノメ ノメ」 
などの 七 音が 圧倒的で， これに 「ギキ ヨウ 
ダイ」 「サダ メナ ラ」 とか 「ノ ムナ ラバ」 の 
五 音の 言葉が 補助 を している 形が ほ と ん ど 
である。 曲に よって は， ここ は わざわざ 7 
文字 や 5 文字になる よ う に 言葉 を 変えた な 
と 感じられ るよう なと ころも ある ほどで あ 
る。 

そう 力'， 七五調 か。 なら 話 は 簡単， 7 文 
字と 5 文字で 演驮の 中 に いかにも 出て きそ 
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う な 言葉， r ナミ ダ ゴィ」 「ヒ ト リザ ケ」 「二 
ド トァェ ナイ」 「 オン ナゴコ ロノ」 などなど 
ィ ッ パイ 集めて つなげれば 一丁 上がり とい 
うこと になり そ うです ねえ。 

そんでも つて つなぎ合わせの 方法で あ る が， 
非常に 簡単に 次の よ うにしょう。 

ほに やらら ららカ f ほに やらら で 
ほに やらら ら らも ほに やらら よ 
ほに やらら ららは ほに やらら ね 
ほに やらら ら なら ほに やらら だ 
つまり 7 — 5, 7-5, 7 — 5, 7 — 5 と 
い う 調子で あ る。 あと はこの 7 と 5 のと こ 
ろに それぞれの 文字 数の 言葉 を 入れて い く 
だけで ある。 そして あっとい うまに 出来て 
し まった のが リ スト 5 の プロ グラ ム。 

どうです， ひどい もんで しょ。 発想が 発 
想なら プログラム も プログラム だね。 まあ 
それでも 一応 走らせて みま しょう 力'。 
といつ て 走つ た 結果が 例 1 である。 
ウー ン， 確かに 失敗 かもしれ ない けど こ 
り や 笑える。 このように 素人の 作る プロ グ 
ラム はう まく 動かな く て も 結構 面白い ので 
ある。 ああよ かった よかった。 これで も 言 
葉 を 厳選 すれば も うちった あま しな 詩が 出 
来そう な 気 もす るし， 試作 版と いう ことで 
お茶 を 濁す ので ある。 やっぱり 単語 同士の 
意味が チ ョッ ト はつな がつ てない と だめの 
ようです な あ。 誰も 言って くれないから 自 
分 自身で 「発想 はよ かった よ」 と^めて あ 
げょ う。 

と ころで リ ス ト 5 の プログラム は チヨ ィ 
ト 気をつけなければ いけない ところが ある。 
そ れは 配列の 取 り 方で ある。 BASIC の 配 
列 は 一般に 添字 0 から 始まる ので ある。 た 
と えば a(5) を 宣言した とする と 配列 a. 
-て 一し さ 


dim str c( 2 ) 【50】 = に' 
a =- ' 
input & 

if a="" then goto 1 
for i=0 to 2 

if a=b( i I then 

next 
goto 40 


にち は"，' 'さ よ うな ち"，'' きみの な 
にち は"，'' さようなら "に X 6 8 K ' 


10 float a, b 

20 print "ax=b" 

30 input " input a : " , a 

40 input " i nput b : " , b 

50 if a=0 and b=0 then print " 

60 if a=0 and b<>0 then print 

70 print "x=" , b/a 

80 goto 20 


" :goto 9 
'■ ： goto 


'リス 卜 2 さっきょく 


秦 リス 卜 4 じんこ 一ち の 一 


next 

m_trk( 1 , 
m_play{ ； 


丄 oc(i , -tOOU ) : next 
_as.sign ( i , i に ne\t 


=0 then aS=aS+ 
= 1 then aS=a$ + 

=2 then aS=a$+ 

=3 then aS=aS+ 

=4 then aS=aS+ 

=5 then aS=aS+ 

=tl then aS =aS + 


dim str a ( 1 00 ) [ 5G J , b( 50 1 


input ' 'あなたのと くちょう 
if b= " " then goto 90 


print ' 'あなた は "，a (お 
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は a(0) から a(5) までな ので， 6 つの 箱 
が 確保 された ことになる。 この リストの 
よ う に 宣言と 同時に 初期値 を 与えて いる 
とき は （二 （データ 0, データ 1, …… } 
で 配列 に 初期値 を 与える こ とがで きる の 
だ） 1 番 fl の デーナ が 0 番に 入る ので |i!J 違 
えない よう 注意が 必要で ある。 いや， 力' く 
言う 私 も 最初 は 間違 え たので あ つ た。 

も う ひとつ 気をつけるべき こ と は 全角 文 
字の 扱いで ある。 普通の 半角 文字 を 使う と 
きはいい 力 5 ', 全角 を 使用 するとき は 文字列 
の 長さ 力 * 倍に なって しまう ので ある。 した 
がって 文字列の 長さの 宣言 STR において 
も， 7 文字なら 14 の 長さ を 宣言して おく 必 
要が ある。 これ また 私 は 引っ掛かって しま 
つ て 恥ず か しい 限り だ 力 f , 次 か ら 気をつけ 
れ ばいい ので ある。 

反省 ^ A 閭 (^韋 大さ 

失敗 は 発明の 母， と はよ く 言った も ので， 
人間に は 反省す る という 素晴らしい 機能が 
備わって いる。 これが あるから 人類 力 5 ', 科 
学が 進歩す るので ある。 反省 をす る 人間 こ 
そがよ り 大きな 仕事 を 成功させる 可能性 を 
持って いるので ある。 たとえば， 私 は 一度 
食べて ま ず かつ た 立食い そば は 二度 と 食べ 
ないように 心掛けて いる。 1 人 ひとりが 気 
をつ ける ことによって， 日本の 立食い そば 
業界 も 発展しょう という ものである。 

この プログラムの 元々 の 発想 は， 「ハイ キ 
ング一 バスの 中の ゲーム 集 j などと 題して 
「書店の 窓際族 j 実用 書 コーナーに 並んで 
いるよう な 本の 中に よ く 出て く る 「創作 文」 

の ゲームから きている。 A 君 は 誰が， B 君 
はいつ， C 君 は どこで， D 君 は 何 を， E 君 
はどうした， というよ うに パラ バラに 考え 
た 文章 をつな いで 面白い 文章が でき るの を 
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楽しむ， という あれで ある。 

ここで は 人の 代わり に 乱数 を 用いて 不規則 
性 を 狙つ ている 力 5 ， こ の 手法 は 創作的な プ 
ログ ラムに ついて 非常に 応用が きく。 リス 
卜 2 の 作曲 もま さ に 乱数の 応用で ある。 た 
だ このよ う に 完全に 乱数に してし まう とこ 
れは 創造と は 程遠い メ チヤ クチャに なって 
しまう ので， そこに はや はり なんらかの 規 
則 性 を 残して おく 必要が ある。 これが この 
手の プログラムの 善し悪し を 決定す る 部分 
であろう。 

そんな わけで リスト 5 を 反省して， もう 
少し 規則 性 を 持たせ る 方向で 考えて い こ う 。 
そのために 7 文字， 5 文字の それぞれが ど 
こに 入っても いいと 考える の はやめにして 
演歌の 流れに し たがつ て， 最初の フ レー ズ 
はこの 単語から， 次 はこの 単語から 選ぶ， 
というよ うに 場所に よって 選べる 単語が 異 
なる ようにして みょう。 

こうす る と ある 程度 演歌の ス トー リー を 
決め な け れ ばな ら ない。 たとえ ば 次の よ う 
になる。 
《例題》 
(いり） 

ホ ニヤラ ホ ニヤラの ホ ニヤ ララに 
ホ ニヤ ラホニ ヤラカ f ホ ニヤラ ララ 

(さび） 

ホ ニヤ ラホニ ャラで ホ ニヤラな の 
(くすぐり） 

ホ ニヤラ ホ ニヤラ は ホ ニヤラ ララ 
(きめ） 

ァ〜 ァホ ニヤラ ララ ホ ニヤラの ホニ 

ャ ラ 

これ を 音符に する と》》； > ~ のよう な感 
じであろう 力'。 歌って みる となんと なく 典 
型 的 な ド演 敬に なって きたよう な 気が し て 
き たで あ ろ う 。 実際の 演歌の 作詞家 もこう 
やって 単語 を あてはめ てい く 作業 を 頭の 中 


まで"，" こ 

lim char c ' 


50 o 1 ( i I = ( rand I I 

55 for j= 1 to i 一 1 

56 if cl(i)=c 
5 7 next 

60 cZ( i l=(rand( I 


then goto 


then goto 


next 


print a{cni)) t b(c2li)) 

next 
next 


で やって る だけなん じ やない かと さえ 思え 
てく る （阿久悠さん ごめんなさい）。 そして 
最後の ホ ニヤラの ホ ニヤラって ところが そ 
のま ま その 歌の 題名に なった り して。 

冗談 はと も かく これ を プログラム にした 

のが リスト 6 である。 リスト 5 に比べて デ 
ータ がず いぶん 増えた が， これ は 各部 分 ご 
とに 5 つず つの データ を 持って いる ので 必 
然 的に 増えて しまったの だ。 

また リスト 5 では 一度 走 らせ ると 5 つの 
詞を 出して 終了して しまって いた 力 f , 今度 
は データの 選び 方に よって ものすごい 数の 
バリエーションが 考えられ るので， リタ 一 

ン キー を 押す たびに ひとつ 詞が 出る よ う に 
してお いた。 もっとも このへん は プロ グラ 
ムの 本質と まったく 関係 な いので どう 作つ 
たって いいので ある。 いっその ことかた つ 
ぱ しから プリンタに 出力して， その 中から 
いい もの を 探し， コンクールに 送って ひと 
儲けなん ての はどうだろう （ダメ か)。 

も ち ろん データに 使われた 単語 は 私自身 
が 考えた ものである 力 ? ， こうやって 乱数 を 
使って 組み合わせる と 自分で も 予想で きない 
面白い 詞が 出来たり する ので ある。 コンビ 
ユー タは 機械的に しか 動いて いないのに， 
出来上がる 詞は 意外 性に 富んで い ると ころ 
が 味わい 深いで はない 力'。 

また 同じよう にして 詩 や 文章， 諺， 俳句 
など も 簡単に 作れそう である。 要するに 乱 
数 を 用いた 発想法の プログラム という わけ 
である。 しか. しこんな 考え かたは 芸術 を 冒 
濱 している よ うでな にか スリ ルを 感じて し 
まう。 たとえば St 数 を 用いて 作曲され た 音 
楽 は 芸術と いえる のであろう 力'。 

そんな 哲学的な こ と を 考えながら 走らせ 
た 結果が 例 2 である。 例 1 に比べて だいぶ 
意味 をな して 演歌ら しくな つてき たかな と 
[例 1 ] 


になみ ちし 

" とて い 

く、 I さ 

ひこい バゃ 

る さ もつ 

を- . ,, 

- き，， -" 

ちで = " ,ぃ 

の" てす なご 

や"， ま ぱ £ 

おすき ん， 

"，まゆ れ^: 


て r い め. 

つ"， し だ，; 

ものい さ，— 


-ぇか 0 も 

- あこつ 2 く 

とどす ぬ 


めな で を * で を どし * なしら ど * ど.^ で * 奪り どで * 

あ- SW さ * ま i た * ぱ たなち * ちた さま * さな 1* 

5 ^ごし * ごしい わ * ん わめい * いわし ご いご * 

おれ いず * いすつ の * れ の だう * うの さい * うい * 

とみ. * .nHf? こ * みこ？^ * もこ やさ * ま.？^ さ * 

***** 

たいの す * ぃ、.^^* いすす い *i9 いす * す iqfc* 

れ？ 4 氺 L5x-n 木 $w まし * なま 木 ま tHX れ 水 

<- らせ * い t*IHK* えてき い *■ をせ えき. *■ せとて ま. * 

5® しみ * ここ ゆう * あに ゆ こ * ちみ あゆ * みこに う * 

て とんて * たるて て * とかて た * のて とて * てる かて * 

n 5^ぃ*^!?±0ぃ つ * どこい な * やい どい * いきこ つ * 

2 も にせさ あで つも * にどつ あ * おさに つ * さで f *w 
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いうと ころで ある。 まあそう はいっても， 
実は この データの 組み合わせ を 考える のに 
ずいぶん 時間 を かけた ので ある。 嘘 だと 思 
う なら 自分で データ を 入れて 走らせて みる 
とよい。 かなり 的 はずれの 歌詞が 出来上が 
る ものである （そっちの ほうが 面白かった 
り して）。 まあ これ は 女の 恨みと いう 典型的 

な 恨 歌の 類 に な つ た が, 第 4 節の くす ぐ り 
の あたり にや や 不自然 さ を 感じる ほか は 意 
外に 面白い 発想が あったり して， 作った 私 
も 結構 遊んで. しまった。 

ここで プログラム を 組んで いる と きに や 
つばり 引っ掛かって しまった 落と し 穴 をご紹 
介しょう。 あまり こういう 細かい ことに 気 
を 取られて いる と 豊かな 発想 を 妨げる ので 
触れた く ない の だが， これ も 世の ため 人の 
ためで ある。 

ひとつ は PRINT 文で 表示され る 位置に 
ついて である。 使用した 文字列の 中には 都 
合で ほかの 文字列よ り チヨ ッ ト長 いもの 力 ？ 
含まれて いたた め， ずれが 生じて しまう。 
そこで ある 程度 文字列の 長さ を 合わせる ため 
に 長い ものに 揃えて， 短い ものに は 空白 を 
加えたり している。 また； （セミコロン） 
を 用いる と 余計な 空白が 必要に なって し ま 
うので， （カンマ） を 用いた。 こうすると 丁 
度よ い 位置に 文字列の 間 を あけて 表示され 
る。 逆に 連統 して 表示したい ところに はセ 
ミ コ ロン を 用いた。 

も う ひとつ は 次の 詞を 書かせる ための 空 
打ちの INPUT 文で ある 力 ? ， これに もなん 
ら かの 入力 変数と 型が 必要で ある。 X- 
BASIC で は 特に 変数の 種類 を 宣言して い 
ない と 怒られる ので 注意が 必要で ある。 た 
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だ 従来の BASIC と 違う という こと を 意識 
しすぎて 喰わず 嫌いに ならないでも らいた 
い。 従来の BASIC を 使って いた 人が この 
BASIC に 慣れる までに 2 日と かからない 
であろうと いわれる， それほど たいした 差 
はない ので ある。 

念 を 押してお く 力 s , このような 事柄 はプ 
ログ ラミ ングの 本来の 姿 と は 関係ない ので 
あって， この プログラムの 本質 は， 「決めら 
れ たデ一 タ の 中 か ら 乱数で 適当な 組み合わ 
せ を 作 り ， 作詞の 模倣 を し た」 という こと 
に 尽きる。 そして プログラムの 技法と して 
は 乱数 と 配列の 使い方 だけが 重要で ある。 
この タイプの プログラム として まだ ま だ応 
用で き るので あ り んす。 

最終 調整と 応用 

「プログラム を 愛する もの は 最終 調整 を 
重要視す る」 と 偉大 な 思想家 • 孔子 も 言つ 
ている ように （ウノよ） 最後の 段階で 挫折 
してし まう の は 少年 マ ンガで も 禁じ 手. とさ 
れ ている ほどで ある （ホン ト？） から， 不 
満な ところ は そ の 場で 直 してお こう。 

リスト 6 の 不満 点 は 第 4 節の 「 くすぐり」 
のと ころであった。 まあ そのつ いでに 第 3 
節に も 手 を 加えて もう 少し ましに したの が 
リスト 7 である。 全体の 単語 分けと データ 
が 少し 変更され ている。 これ を ワク ワクし 
て 走らせる と 例 3 のようになる （実際 舌し 数 
を 使って いる と 予測が できない から ドキド 
キ させられて 結構 楽しい）。 

素人と して は， いや 舌し 数と して はこのへ 
んが 限界で， プロの 詞の 足元に も 及ばない 

[例 2] 


1 int a 






5 dim int. 

cl ( 10 t 





10 dim str 

a 1 1 -1) [ M ! = ( " 

おんな 


ろの"，" いのち を 力、！ 

ナ た"，" z z 

ろ 力 、'わ り の' 'に' 

ひとりぼっち ク 

) "あ 

な た 

しんじた'' 1 


26 dim str 

a2 ( -1 ) [ 10] = { " 

かなし 

さ に 

"にさ び しさに"，' 'く 

るし さ！；；'' 

"おろか さに ' ， 

ふしあわせ"） 





30 dim str 

a3(4 ) [ 16]=[ M 

さよう 

も な 

き ます"，'' ないての- 

k ます " ， 

く いて かなし t 

いつも ォ 

：) びし I 


，"こころさびしい 


40 dim str 

a4(4 ) I 10 1= (" 

みなと 

ま ち 

'に' なみだ ざけ'' ，"ひ 

とり ざけ'' 

"ひとりたび"， 

むねのう ち'' } 





50 dim str 

ao(4)[M] = f" 

あ な た 


しい"，' 'あなたい と 

ノ い'' にき- 

とまちます "， " 

いとしい ひとと'' にあ 

な た 

しんじて" J 


60 dim str 

a6{4) [14J=(" 

いつま 

で も 

'に' さいごまで"," い 

ゥの ひか'' 

' 'きょう あまた 

'に' なみだ さ え 

') 




70 dim str 

a7M ) | 16 ]= |" 

さびし 


ころ は"，'' せけんし （ 

5 ずの -', 

おやの ちをひく 

"，"ちって '- 

) まれ； 


，"どこかに てます 

" ) 

80 dim str 

a8(4J[10]=[" 

みれん 

ぱ な 

"，"とお n あめ"， " は 

ぐれ どり" 

"わたり どり"， 

かれす すき'' 1 





90 dim str 

a9(-l) [ 12] = {" 

いつま 

で も 

' , " この こ こ ろ " , " お 

もいだ す" 

"ぬくもり を"， 

'もういち ど'' 1 





100 dim str 

al0( 4 ) 【 14 J = ( 

'はこ？ 


, "せんだ い"，" に wt 

1 た"，" つ 力 

る'' ，"ながさ き 

} 





お 
。 。 

al 1( 4 ) (14 )={ 
to 10 

" ほ な " 

， '■ ひ 

と"，'' おとこ"，' 'くに 

'V' や ど -. ) 

130 clii 

= ( rand{ ) mod 

5 ) 




l 40 next 






150 print a 

L(cl(0) ) 

" ,a2 ( 




160 print a 

Kcl(2)) f a4{c 

1(3) ) 




170 print a 

i{cl{4) ) ," 

" r a6( 




1 80 print a' 

Mcl (6) ) ,a8(c 

1(7)1 





print " あ あ " ；e 
print" * * # * 
200 input a 
210 goto 120 


(と フォローして おこう） が, 逆に プロ 力す 
このよう な ツール を 持ったら スランプ を 楽 
に 抜けられ るので はない 力'。 

どうです， 作詞家の 皆さん， お 安く しと 
きまつせ。 普通の 皆さん はこの データ を 変 
えて， 自分の 選んだ 言葉で 遊んで みて おく 
んな はれ。 暗い 歌 や 明るい 歌， 女に 味方し 
た 歌と， 男の 歌と いうよう に， 結構 その 入 
の 性格が 出 まっせ。 逆に プログラムの プロ 
といわれる ような 人 はこん な チン ケな プロ 
グラ ム では 満足せ ずに 徹底的に やる かもし 
れな いねえ。 膨大な 7 文字， 5 文字 その他 

2， 3, 4 文字の データベース を 作り， さ 

らにそ の 意味から 相性 度の よ う な 評価 値 を 
入れて おき， 人工知能 まがいの システムで 
本格的な もの を 作る 人 （そんな 物好きな 変 
人 はいないでしょう？） も 出て くる かもし 
れ ません ねえ。 
私 はい まそんな ことに 興味が あるので はな 
く， 何 を どのように プログラム 化する 力、 
と いう 基本の 素振り を 行って いるので ある.。 
したがって でき る だけ 最小限の 仕様に と ど 
めて おく 方針で 行 き た いと 思って いる。 あ 
と は 応用 次第な ので ある。 
実は 「何 を」 「どのように」 プログラムす 
る 力、 という 部分が 実は 最も 面白く， 最も 
忘れがちな ところで ある。 だから 私 は， 

「暇 プロ」 
をお すすめ しょう。 

「暇 プり 

と は， 暇に 任せて つらつらと 無計画に， し 
かも 簡単な プログラム を 組んで は 壊し， ま 
た 改良した りして， 新しい 発想 を 磨く ので 
ある n 


こ * 

と * 

お * 

にけ えりの * 

さ ざ さどい * 

し g れだ 水 

なと み ぐん. * 

か？ ^はせ 木 


に氺 

く * 

せ？？ りの * 

わたで f * 

あ れさ * 

しとつ ぐが * 

ふ ひい はな 木 


こ * 

た と 木 

に？ 

さた， i9 の *■ 

し. Cvi9 る * 

なと よれが * 


ど 木 

や * 

にび えりの * 

さた さ 氺 

し. れさ木 

なと 

か 经 はな * 


は 木 

たいすろ ろ氺 

.iv,^ ここ * 

を ち ここ * 

象まい の * 

ちて としこ 

のい 氺 

いくき. 2«*、 


のいて VAJ.* 

ち， 

つ びんて い 木 

ぼ さしに う * 

りろた かも 木 

とこな こ あ * 


たす てす ろ * 

かみんて こ * 

をのし にの ネ 

ちて たかこ * 

の いなこ ぁネ 

： いな あま ネ < 


のす いく を * 

しひり * 

つみい.？ 5-* 

ぼの こ. 木 

りて たのぬ * 

といな や あ 水 


清水 和 人 流 プロ グラミ ング 道場 4 J 


200 input a 
210 goto 120 
220 end 

リス 卜 8 明るい 歌 



10 dim str aU 4 1 【 
もげん きな' 'にわ 力 ゝ く ま 

20 dim str a2( 4 I [ 
' 'あのひとに'' に' はるの 

30 dim str a3( 4 I [ 
これ はお かしい " , " V 

40 dim str a4 (4 ) [ 
' 'おおさわぎ'' にわら い 

50 dim str a5 ( 4 ) [ 
しかついで' '，"ほろ よ t 

60 dim str a6 ( 4 1 t 
"う * うたう'' ， "なき わ 

7 0 dim str a7 ( 4 ) [ 
でたとこしょうぶ"，'^ 

HQ dim str a8( 4 ] ( 
"たいこ もち' 'にむ せき 

90 dim str a9{ 4 I [ 
' 'おかしい ね"，'' やめら 
100 dim str al0( 4 ) 
なつ"，'' こんじょう' ' I 

1 10 dim str al 1{ 4 ) 
o " ) 

120 for i=0 to 10 
130 cl ( i )=( rand 


これ は一 見なん の 得る ところ も ない よ う 
な 気がする 力す， 人が 考える こと を 一緒にな 
つて 考えて いて は 結局 二番煎じ になって し 
ま いかね ない。 最初 は く だら な くても 自分 

で 考える ことが 大切な の だ。 ひと 昔， 10 年 

く らい 前 は， 現在 基本 ソフ ト と いわれて い 
る ソフト は ほとんど なく， また グラフ ィ 

ックゃ FM 音源な どの ハード もな く， 皆 
BASIC でプ ログ ラム を 組む のが 当 た り 前 
だった。 そのため， 暇 プロ をす る 人が 多く 
さまざまな ソフト が 投稿 さ れて いた も の だ 
が, いま は ゲーム 全盛な ので BASIC を 使え 
る 人の 割合 は 相当 低い ので はないだ ろ う か。 

• U ス卜 7 演歌 3 


なんとなくつ まらない と は 思わな いだろ う 
か。 

I 今月の まとめ | 

最後に アマ グラマの 重要な 点 を ま とめた 
りする。 

1) 何 を やる 力 1 がいちばん 重要。 

2) 次に ど うやる かが 重要。 

3) 最初 はで き る だけ 簡単に 考え てプ ログ 
ラム をまず 作る。 

4) 暇 プロで いろいろ く だらない プロ グラ 
ムを 作り 発想 を 磨く。 

[例 3] 


そ いで もつ て 今回 出て き た 項目 は， 

1) 文字列の 配列 

2) 乱数に よ る 選択 

つてと こだろう 力'。 もちろん 必要の ない よ 
うな こと はすべ て 省略した。 これから も簡 
単な プログラム ばかりで 行 こ うつと。 

さて 本当の 最後に， 今回の 例 を 見て 暗い 
人 だ と 思われる と 嫌な ので， 「明 る ぃバ一 ジ 
ヨン」 を 作った のが リスト 8 で， それ を 走 
らせ たの 力 ? 例 4 である。 なんだか 青春 や N 
HK や ニューミュージック という も のを感 
じさせる ものと なって しまい， 自分 を 再認, 
識 してし ま う 今日 この頃であった。 
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特 
集 
1 

曰 本 語 を 処理す る 

ための 枣章 



ソコン の 主要な 用途と して 挙げられる 「日本語 

ワードプロセッサ Jo パソコンの 性能 を 測る 目安 

として， どれ だけ 優秀な ワープロが あるかと いう 
の を 挙げる 人 も 多い。 誰もが もっとも 必要と され 
る アプリケーション だと 信じて いる 割に， 通常， 
ビジネス アプリケーションと して 捉えられ ている， 
それが 日本語 ワードプロセッサ だ。 
ふつうの 人 は それほど 文書 を 書かない というの は 
事実 だし， 多くの 人 は 快適な 入力よ' り， 美しい 出 
力 を 求めて いる。 では 優秀な ワープロと は？ 
日本語 処理が 真に 私たちに 必要な もので あ る なら， 
環境の 改善 は な にに もまして 必要 な こと だとい え 
る。 同じ 処理 系 を 使って いても， 身の 不幸 を 嘆く 
ばか り でな にも 努力して いな い 人 と 地道に 環境 改 
善して いる 人で は 大きな 違いが ある。 信じよう。 
ソコン と は， 使い込めば それなりに 応えて くれ 
る もの だと。 
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特集 1 


曰 本 語 を 処理す るた めの 序章 


ワープロ を 使う 前に 



日本語 を 書く ための 7 つの 方法 


Yoshida Kouichi 

吉田 幸 一 


素晴 しい ワープロが あつたと しょう。 さあ， 君 はいった いなに 
を 書く のだろう か？ 数え きれないく らい 世に出て いる 日本語 
ワープロ はいった いどのよ う に 使われて いるの だろ うか？ こ 
こで は r 文字に よる 自己 表現」 の 手法 を 考えたい。 


あるんだ けれど, 
いきろう」 

に "詞" 


それでな 



a^^©^, 部 (^幾 輩に "詞" という 名 
可き i マ がめ、'。 "ことば" と 読 
むの だそう.!;'。 う 一ん， いい 名前 だな あ。 

.is^*^ ^たいな あ。 きっと， どこかで 
主婦, は' てたり す るんだ ろうな あ。 と， 今月 
<^fe^T"N に 語 だ というの を閒 いて， ，£' ユ、 

— » た。 

：' ネス マン は 手紙 を 書いたり， 
'たり， 企画書 を 書いたり， そ 
ま告 書の ために ワープロ を 使う。 
私 は 仕事と して ワープロ を 使う。 学生 はレ 
ボート や 卒論の ために ワープロ を 使う。 ち 
よつ とした チ ラシな ど A4 用紙 1 枚 以下の 
文書の ために ワープロ を 使う。 

全部， 実務 的な 道具と しての ワープロで 
ある。 それ. 以外で ワープロ を 使って いる ュ 
一 ザ 一は どのくらい いるの だろう， という 
の は なかなか 疑問であった。 ワープロって 
結構 謎な ので ある。 ワープロ という もの を 
見て いると "文章 を 書く こと は 誰し も 自然 
に 行う 行為で ある" みたい な 扱い をされ て 
いるから。 

た と えば 最近の 若者 は 文章 を 書かない， 
みたい ないい 方 をよ くされる。 それ は 問 違 
いで ある。 その 証拠に， パソコン通信 をち 
よつ とやって みると， くだらな いこと を 書 
いた 文章に 山 ほどお 目に かかれる はず だ。 
やはり， 機会が あ れば誰 だつ て 文章 は 書く 
ものな の だ。 

■ 趣味の ワープロと は 

娘 初に ワープロ ソフト を 前にして， あな 
たはな に をした だろう 力'。 おそらく， 毒に 
も 薬に も ならない 文章 を 打ち込んで 喜んだ 
ので はなかろう 力'。 私 は， X68000 を 買つ 
て ワープロ を 立ち上げ たの はいい けれど， 
なにも 書く ことが なく， 近くに あった 哲学 
書 を 打ち込み 始めた やつ を 知っている。 

昔， アルバイトで ワープロ 教室の インス 
トラクタ一 を やって いたと き， 休憩 時 lilJ に 


サザン の 歌詞 を 一心不乱に 打ち込んで 喜ん 
でいた 女子大生の 受講者が いた。 

これが もう 少し ワープロ に 惯れて くると， 
ギター を 抱えて キーボード を 前にして 詩 を 
書く ャッが 出て きたり， 小説 を 書く ャッが 
出て きたり， 意味 も な く 論文め いた エツ セ 
ィを 書く やつが 出て きたりす る。 プリンタ 
なんかなくても， 発表す る 場が とりあえず 
な く て も 構わない。 

私 はこう 考える わけで ある。 文章 を 書く 
こ と は， Z's STAFF でなん か 絵 を 描く こ 
とと 力'， ギター を かき 鳴らす と 力'， 漫才 を 
すると 力'， プログラム を 書く とかと 同じく， 
表現の 一種な の だ。 "人間 は〜 する 動物で 
ある" シリーズの ひとつに， "人間 は 表現 
する 動物で ある" つてい うの を 入れたい く 
らい だ。 人間 は自. 己 を 表現しょう とする 本 
能 を 持って いる， なんて 怪しげな 言 菜に し 
て も いい。 

喋る のが 主な 表現で ある 入 もい るし， 絵 
を 描く のが 表現な 人 もい るよう に， 書く こ 
と も 一種の 表現に 過ぎない の だ。 

そして， ワープロ というの は， 表現 を 支 
援 する 道具な ので ある。 

| 書 さ 残す こと ず かしい ことで ある 

さてさて， 文章 を 書く こと は 文明に 冒さ 
れた 人間の 自然な 表現の 一種で ある という 
ことにした。 その 証拠に 私の 部屋 を 引つ 搔 
き 回す と， 書き かけの 小説 やら エッセィ や 
ら詩 やら を 残した 原稿用紙 や レポート 用紙 
がポコ ポコと 出て くるので ある。 ワープロ 
はそう いった 表現 を 援助す る 道具で あ り メ 
ディ ァ なの だ。 

なんだかん だいって， 我々 が 日 本 語で （少 
なくと も 意識のう えで は） もの を 考える 限 
り， ふつふつと 湧いた 意見 や アイデア を 残 
すに はま だま だ 文章 や 詩 という の は 有効 だ。 
少な く と も 映像 や 音楽よ り は暖昧 でな く ， 
新 し く 修得す ベ き 技術 も 少 ない。 

ワープロ を おもむろに 立ち上げて， 適当 
な ファイル 名で 書き留める。 


そうした 文章 は， 何年 かたって 読み返す 
とたいて い 読む に 耐えない ものだった りす. 
る 力 { ， そこで 消して はいけ ない。 手 を 加え 
て もい い 力 *， 消して はいけ ない。 重要な 
"青春の 汚点"， "過去の 汚点" なので ある。 
私なん て 汚点 どころ 力' "過去の 汚 面" く ら 
いたくさん ある （汚点— 汚 線— 汚 面— 汚 体 
と 次元が 上がる）。 なんという 力'， 若気の 
至りと いう 力'， 若気の アンと いう 力'， そん 
な もんで ある。 

| 表現に 対する 衝動に ついて 

表現す る ことと， なに か を 創り 出す こと 
は 同じ。 表現した いものが 自分の 中に しか 
なかった と き， 他人の 真似 や 引用で な く 自 
分が 表現で きたと き， それ を 創造と いう。 

表現す る と いう 行動に おいて 重要な の は， 
それが 自分に ど う フィードバックして く る 
かにつ きる。 表現 物が 他 入の 目に 触れない 
場合で も ， 頭の 中で 思つ ている よりより 文 
章に する ほうが フィードバック は 大きい。 
さらに， 他 入に 読んで もらったり 聞いても 
ら つた ほ うが フィー ド バック は 大きい。 

小さ な 子供 は 大人 や 友達に 相手 を しても 
らいたくて， あの 手 この 手 を 使って 表現す 
る。 結果が フィードバック されて， うまく 
いった 方法 は 何度も 使い， うまくいかなけ 
れば 新しい 手 を 考え出して， 学んで いく。 
それ はいくつ になっても （ガキ のように 望 
んだ フィー ドパ ックを 得る た めに すねたり 
駄々 を こねたり はしなくなる けれ ど も ） 同 
じこと だ。 自己顕示欲， なんてい うとい い 
意味に とられな いこと も 多い 力、 誰でも そ 
ういった 衝動 は ある。 人に 見せられない 銜 
動なら， 自分に だけ わかる ように 表現 すれ 
ばいいで はない 力'。 

頭の 中で わかって いるよ う に 思って いる 
ことで も， 頭の 中で は 理路整然と している 
ように 見えても， いざ 文章に しょうと する 
とう まくい かない。 実のところ， 人 は 言葉 
だけで ィ メージ する もので はない からだ。 
言葉で ない もの も 言葉に しなければ ならな 
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いから だ。 それに は 多少の 訓練 は 必要 か も 
しれない 力-;, こと 日本語に 限って は， 誰し 
も 素養 は ある の だから， そ う 大変な 作業で 

はない。 

言葉 を 積み重ね てい く こ と によって 脳 は 
成長して いく の だ。 

I ワープロ だと こんなにお いしい 

そして， ワープロ というの は 手書き 文字 
と 違い， 客観的な フィードバックが 得られ 
る 点で 秀逸で あ る 。 問 欠 的 に 湧い た考 え を 
まとめたり， 無手順 垂れ流 し で 吹 き 出 た 単 
語の 羅列 に 意味 を 持たせ るよう 加工す る の 
に 最適な 道具な の だ。 決して 紙と ペンの 代 
わりで はなく， もつ と 積極的な 支援 ツール 
なので ある。 綺麗な 文書 を 作る ためで はな 
< , 言葉 を 書き留める ための 道具な ので あ 
る。 プリ ンタ はな く て も 構わない。 

ワープロで 書く ことの メリット を まとめ 
てみ よ う。 

1) 書く ことによって 自分の 考え や 言葉 を 
客観的に 見る こ とがで き る。 

2) い 一 加減な 考えで も， それなりの もの 
に まとめる こと がで き る。 

3) 自分の 考えの あさはか さ を 知る ことが 

でき る。 

4) 想い を 吐き出す ことによって 力 タルシ 
スを 得られる。 

5) 自分の 考えて いる こと を 知る ことが で 

さ る。 

ほら， こんなに ある。 ワープロ によって 
書かれた もの を 伝達に 使おう とすれば プリ 
ンタは 必要 だけれ ど， プリンタ を 使わな く 
て もこん なに メリット は ある ので あ る 。 手 
書きと 違って， 読み返す ことが 簡単 だから 
だ （そんなの は， やたら 字の 汚い 私 だけ だ 
ろ う か）。 


文章の 書き方 入門 


"覆 水 盆に かえらず'' という 中国の 有名 
な 故事が ある。 昔， 中国の 越に 覆 水と いう 
大変 親孝行な 青 午が いた。 彼 は 毎年お 盆に 
なると， 都から 田舎の 母親のと ころへ 帰つ 
ていたの だが， ある 年， 道中で 事故が あつ 
て， 帰省で き なくなつ た。 突然の こ と で 便 
り もで き ず， 覆 水が 帰つ てこない こと を は 
かなんだ 老齢の 母親 は ショッ クで 死んで し 
まった という 話で ある。 教訓 として， 普段 
孝行な ばか りにちよ つと した 事故で 親 を 嘆 


かせて し まった。 適度な 親不孝 は 必要で あ 
る， と， 私に 有利な 結論が 導き出せ るので 

あった。 

もちろん， この 話 は 嘘八百。 し 力 'し， 
"覆 水 盆に かえらず" という 言葉し か 知ら 
ない 人で あれば， 信じた かもしれ ない。 単 
独で 絶対的な 意味 を 持つ 言葉なん てな いの 
である。 その 言葉が 連なって 作られた 文 も 
またし かり。 

■ 第 0 講 「胃に するとい うこと」 

こ う いう 大 原則が ある。 

"人 は 自分の 知らない こ と は 書け ない" 

さらに， こう 続く。 

"人 は 言葉 と して 知 る と は 限 ら ない" 

私 は， マグリットの 1 枚の 絵 を 見て 感動 
した。 その 絵 を 描写す る こと はでき る。 そ 
れは 映像 を 言葉に 変換す る ことで ある。 そ 
の 際に 私 は， その 絵 を 描写す るに 相応しい 
自分の 知っている 言葉に 置き換える。 それ 
を 解釈と いう。 自分の 知っている 言葉で 表 
せない と （たいてい そうだが） 石になる。 

なんらかの 言わん とする こと は， 映像 や 
音 や 動き や 言葉 や いろんな メ ディ ァでィ メ 
ージ され， それ を 映像で 表現す ると きはィ 
メージ のす ベて を 映像に 変換しょう と 試み， 
文章で 表現し よ うとす ると き は イメージの 
すべて を 文章に 変換し よ う と 試みる わけ だ。 
ああ， 無謀。 

映画 を 見て 感動 したと き， 小説 を 読んで 
感動した とき， ゲーム を やって 感動した と 
き などなど， 人 は それ を 表現した いと 思う。 

表現す る 手段が 文章の と き ， 
"表現す る に 必要な 言葉の 知識" 


よくい われる のが， 学校の 先生で もい う 程度 
のこと だが， 

' '読む 人の こ と を 考えろ" 
である。 これ はたいて いの 場合 無駄で ある。 害 
き惯れ ない 人 は ' '自分と よく 似た 感性， 嗜好 を 
持った 人し か 想定で きない" から。 これ は 文章 
に 限らず， 音楽で も， マン ガ でもよ く 似た もの 
だ。 

代表的な のが 比喩の 使い方 だ。 Oh!X だから こ 
そ "〜は ドラゴン である" とか "〜は その 筋で 
ある'' なんて 言い回しが 通用す るので あって， 
これ を 違う 言葉で 表現し ようと 思う と， 非常に 
苦労す る。 害き 換えに よって "〜は ドラゴンで 
ある'' という 言葉 自体の 持つ リズム をな くす と 
同時に， 正確に 表そうと すると， 論文の ような 
理詰め に ならざる をえ ないか ら だ。 比喩 は 便利 
である。 しかし， 乱用 は 慎むべき だ。 

という わけで， 想定すべき 読者 は 以下の よう 
に 考える のが 正しい。 

"その 文章 を 害 く にいた つた 経緯 やそのと き 



"自分が なにに 感動した か 見つめる 心 " 
が 必要になる。 脳よ， 働け。 

商業 誌な ど 不特定多数の 入 を 対象に する 
と， それに， 

" 自分が 感動 し た 理由の 分析" 


や， 

"主観と 客観の 分離" 
が 追加され る。 

ど れ も 非常 に 厄介 な 問題で あ る。 今回 は 
そういつ た 厄介な 問題に 取 り 組む わ けだ。 

表現しょう とするな にか を 自分の 中に 持 
つ こと， それが いちばん 重要で ある 力- ; , そ 
のく らい は 誰に だって， あるよ ね。 なけれ 
ば， 入 間と して 問題 だ と 思 ラ。 はは は。 

表現 し た り 感動した りする た め に 必要 な 
の は， 経験 だ。 人 は 自分の 経験に まったく 
引つ かからない ものに 感動 はしない し， 経 
験な く して は 表現 はでき ない。 この 経験と 
いうの は 生まれてから いま まで 見たり 聞い 
たり 触ったり して， その 入の 感覚に 対する 
入力す ベて を 指す。 

創造す るなん ていっても， なんの 経験 も 


の 心情な ど， その 文章に まとわりつく 記憶が な 

い 状 II での 自分'' 

である。 

これ は 結構 簡単な ようで 難しい。 害いて いる 
時点の 自分に とって 当たり前 のこと でも， 記述 
しなければ ならない こ ととい うの は， 多い もの 
なの だ。 かとい つて， いちいち 全部 害いて いて 
はた だのな にがい いたい かわからない 駄文。 

面白い 二と を 思いついて （思いつい たと 思い 
込んで)， とりあえず エッセンス だけで も メモ 
にして おこう， と 害いた 落耆き は， たいてい I 
週間 もす ると， なにが いいたかった のか わから 
な く なる。 これ は 情報が 足りなかった ので ある。 
そのと きの 状況 や 心情が 思い出せて はじめて 意 
味 をな すの だ。 こんな 文章 を 害いて いて はいけ 
ない。 

リ ズムゃ 流れ を 保つ たま ま， 必要な 情報 を 盛 
り 込む。 二れ は 一種の テクニック を 必要と する。 
偉大なる 先達の 作品 を 読む のがい ちばんい いだ 
ろう （結局， 読む こと は 大事）。 


人に 読ませる という こ 
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ない ところから ボン と 創り 出す なんて 不可 
能な の だ。 これ は 本当。 
だから， 経験 は 広く 多い ほうがい いの だ。 

■ 第 1 講 「上手^ を 書け ない 理由」 

誰でもい 〈ばくかの 経験 はあり， 言葉 を 
ある 程度 知って おり， 本 を 読んで いる はず 
だ。 経験 はすべ て 無意識の うちに 蓄積され 
る。 だから 誰に でも 書け る はずな のが 文章 
である。 

しかし， そうは 問屋が 卸さない。 "自分 
が 思つ た こ と を 論理的に 記述す る こと は不 
可能" だから だ。 それ 以前の 主観と 客観の 
分離 だって 難しい というのに。 

そこでた いていの 人 は 論理的な 記述 を諦 
め， 感覚に 訴える， 目に 優しい 文章 を 試み 
る。 文学的な 表現 をし よ うとい うわけ だ。 
これ も 失敗す る。 理由 はいろ いろと ある 力 5 , 

"ま と もな 文章 を 書く ための ルール を 知 
ら ない" 

"言葉 を 知らない" 
などに よって， 思った よ うに 進まない のた ％ 


これ は プログラム を 書く と きに， 

"アル ゴリ ズムが 記述で き る" 

"その 言語 を 知っている" 
という 条件が 揃わないと 駄目な のと 同じで 
ある。 テキ トーな 言葉 を 連ねて， わざと わ 
力 'りに く い 文章に して ごまかす という 手 も 
ある 力 { , そんなの は "ェセ 哲学 屋" に 任せ 
ておけば いい。 

■ 第 2 講 「—蘇 やすい 鶴と は」 

こ こで 期待して いる 人 をが つか りさせ よ 
う。 たいていの 人 は "読みやすい 文章 はす 
なわち， いい 文章" だと 誤解して いるから 
だ。 

正しく は， 

' '読みやすい 文章と は， すなわち， パタ 
ーン 化された 表現が 多用され， 読者の 持つ 
価値観 や 経験 （疑似 体験 を 含む） から 逸脱 
しない 文章" 
なので ある。 

赤 川 次郎の 文章 は 読みやすい。 しかし， 
名文で はない。 読者が 手を抜いても 読める 


文章に 重要な 流れ 


文章に は 流れが あり， リズムが ある。 流れが 
スムーズ だと， 内容が わからな 〈て も 素直に 読 
める ものである。 

その 究極の 形態が 短歌で あり， 俳句 だ。 あん 
な もん を 解釈して 喜ぶ の はタコ である。 そ 二の 
ところ を 高校の 古典の 教師 はわ かってい ない。 
あれ は， 古代の 歌謡曲な の だ。 気持ちの いい 言 
葉 を 並べて， なおかつ， 内容が まとまつ ていれ 
ぱ 勝ちな の だ。 

5 • 7 • 5 • 7 • 7 つてい うの は， 音楽で い 
うと ロック や レゲエ ゃジ ャ ズな どの リ ズム と 同 
じであって， ときどき ある 字余り は シン コぺ一 
シ ョ ン なの だ。 聞 く 人間 は 詠まれた 句 を 聞きな 
がら， 予想 を はずされたり， 思わぬ 才チを 聞か 
されたり して 感心して いたに 違いない の だ。 句 
会なん て， セッションと 同じだった の だ。 

その 二 と に 気づいた のが 大学に 入って から 
だった 私 は， 中学 • 高校の 6 年間， 古典の 時間 
を 無駄に 過ごして いた ことになる。 う 一ん， く 
やしい。 

散文で も 同じような も ので ある。 

自分が 害こうと する 内容 を， いかに ちゃんと 
した 流れで 表現す るか。 文章に リズム を 持たせ 
るか。 それが 問題 だ。 流れが しっかり していれ 
ば， 読者 を 誤魔化す こと もで きる し， 害き なが 
ら r こんな はずじゃなかった j なんて 思う こと 
もない。 

もし， どうしても 頭の 中で 考えた ような 流れ 
の 文章に ならない の だとしたら， 頭の 中で 考え 
た 流れが， スムーズでなかった， あるいは 間違 
つていた わけで， それ は それで ひとつ 頭が よく 
なった と 思って 喜ぶべき である。 きっと. 害く 
行為 な し では 気がつ か な かった ろうから。 

しかし， 自分で 慼 じたよう な 流れ を 保って 文 
章 を 害く の は 難しい。 たいてい， 予想 だに しな 
い 方向へ 筆 は 進み， あらぬ 結論 を 出そうと して 


しまう。 特に 害 〈行為 は， 人の 考え を 極端に し 
ていく。 害く ことによ る フィードバック によつ 
て， それまでに 害いた 内容が 増幅され て 次の 文 
に 反映され るから だ。 

これ は 害く よ り 考える ほうが 数倍 速い こと も 
理由の ひとつだろう。 人 は 言語 だけで 考えて い 
る わけで はない から， 文章に するとき は 言葉に 
なって いないと ころ や 飛躍した 考え を 補完し な 
がら 害く 必要が あるから である。 

やばい， と 思った とき， よく 使う 手が" さ 
て'' などと いう 話題 転換の 術 や， "う 一ん" と 
いう 擬音で 誤魔化す 術で ある。 なるべくなら そ 
ん な 術 は 使わ ない にこした こと がな い。 

思考 や 感覚 を 流れの まま 文章に できたら， そ 
れで第 I 段階 は 終了で ある。 言葉の 使い方が お 
かしかろう が， 文法的に 変な ところがあろう が, 
美 し い 文章に なって いよう がな かろ う が, 流れ 
がしつ かり していれば， 読む 者 は 誤魔化されて 
しまう。 なかには 祝 一平 氏の よ う に 誤魔化され 
ない 人間 もい る 力 、'， そういった 読者 はと リ あえ 
ず 考えな く て もい い。 そんなの は 次の 次の 段階 
だ。 

人 は 流れで 文章 を 読む ものである。 一言一句 
論理的に 追い かける 人 は （私みたい に 怪しい こ 
と を 害く ライターの 文章 を チェック する 不運の 
編集者 はさて おき） あまりい ない。 "哲学書が 
(良質の もので あっても） 読みに くいの は， 事 
前に 知識 を 要求す る こと だけでなく， 普段 我々 
が 読んで いる 文章のと は 異質の 流れ • リ ズムの 
上に 成り立って いるから'' である。 翻訳 文が 読 
みにく いのも 同様 だ （最近で は 翻訳 文 も ひとつ 
の 文体と して 市民権 を 得て いるので 一概 にそう 
とはいえない が）。 

とはいえ， 読者に 少しで も 理解して もらおう 
と 思ったら "流れが 論理的に 追える もの" であ 
る ことに こ した こと はない。 


ような 書き方で， その 程度の 内容し か 書い 
てない からだ。 読みやすいの は 当たり前で 
ある。 

た と えば 中世の 古城 を 表現す る と き， 
"中世に 建て ら れた よ う な 旧び た 古城が 
あった" 

とする。 たいていの 日本人 は 自分な りの 石 
でで きた 古城 を イメージ する。 いまの 時代， 
中世の 古城と いってな にも 思い浮かべられ 
ないやつ はいない。 しかし， それが どんな 
城で あれ， それで 終わりで ある。 「作者の 
イメージ する 城」 は どこに もない。 

昔， 平 井 和 正と いう SF 作家が， 星 新一 
に 文章が すらすら 読める ようになった， と 
いわれて 嘆いて いた （曖昧な 記憶 だ けど）。 
平 井 和 正 は 比喩 や 修飾の 多い， 一見 複雑な 
文章 を 書いて いた。 それが すらすら 読める 
と はどうい うこと か。 表現の パターンが 読 
者に 読まれて しまい， 一言一句 追わなくて 
も， その 内容が わかって しまうよう になつ 
たからで ある。 つま り， 平 井 節 （といわれ 
る 文体） に 読者が 慣れて しまつ たの だ。 

という わけで， 読みやすい 文章が すな わ 
ち 名文と は 限らない ので ある。 そこ を 勘 違 
いする と， 他人の 作り上げた パターンの 表 
現 を 積み重ねた だけの 文章し か 書け な く な 
つてし まう。 人気の ある 村 上 春樹の 文体 だ 
つて， よく 読めば， アメリカの ハ一 ドボイ 
ルドの 文体 を パクって 日本風に した だけ， 
に しか 思えない。 

他人の 文体 を パク る こと は 力 ッコ いい 文 
章に は 欠かせない 力 ? ， ノぐク つてい る 自分 を 
意識す る こ と が 必要 だ。 

意味 もな く 複雑で 読みに く い 文章 は 論外 
だが， 読みやすい 文章 を 目指す あまりに， 
必要な 情報まで 捨てて し まって はいけ ない。 
読みやすい 文章 を 目指す の は 次の 段階で あ 
る。 

| 第 3 講 「悪文で 育つ と 悪文し か 書け ない」 

作文 は， 生まれながら にして 持って いる 
本能で はない。 後天的に 表現 手段の一 種と 
して 身に つけた ものである。 よって， 悪い 
環境で 育つ といい 文章 は 書け ない。 という 
わけで， 悪い 文章 を 紹介しょう。 我々 がい 
かに ひどい 文章に 囲まれて いるか 知って ぞ 
つと する がよ い。 

D …… 栗 本 は 野 上と 出かける 約束 をして 
いたが， 時 問に なっても 侍ち 合わせ 場所に 
来ない ので， 電話 をした が， 出なかった。 
そして マンションまで 行き， 声を掛け たが 
返事がない ので 中に 入る と， 風呂場から 水 
の 音が する ので また 声を掛けた。 …… 
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(Misty 4 よ り。 Oh!X 8 月 号 30 ページ 左下 
の 写真 参照） 

こ れは 会話 文な ので 悪文の 例 として はち 
よ つ と 不適当 だが， こ う して 活字の 文章に 
置き換え ると なにが 悪い か 読者 諸氏 にもす 
ぐに わかる だろう。 

まず， 8 つの 行為が 2 つの 文章に 詰め込 
まれて おり， リ ズム がな い。 事象の 羅列で， 
その 事象が 句点に よって 4 つもつな がって 
いて， "〜力 ? " と "〜ので" が 乱発され て 
いて 見苦しい。 

実際， 我々 の 日常会話 はとい うと， おそ 
らく もっともつ とひ どい 日本語 を しゃべつ 
ている に違いない。 だが， 仮にも 第三者で 
ある 読み手に ィ メ一ジ を 再現させる こ と を 
前提と し た メディア （小説で も テキ ストア 
ド ベンチャー でも） では， ある 程度 を 整然 
と し た 文章 （たとえ 非現実的で も） を 用い 
るよう に したい。 

2) 近くの 森 を ぶらつい ている とき， 君 は 
不思議 な ジプシーの ゥヮサ を 誰かが してい 
たの を 思い出し ていた。 

(ウル ティ マ V より。 Oh!X7H 号 30 ページ 
の 画面 写真 参照） 

1) ほ どひ どく は な <■ 、 が, 変 な 文章で あ る 。 
"~ とき，〜 思い出し ていた" というつな 
が りが 変な の だ。 "〜しながら， 〜思い出 
し ていた" 力'， "〜とき， 〜思い出 し た" 
でな ければ おか しい。 翻訳の た めかと 思 わ 
れ る 力 も う 少 し綺 腿な 日 本 語に な ら な か 
つたろう 力'。 

書き換えの 例 を 検討して みょう。 前後の 
文章に よって ど れ がいい かは異 な る 力 s， 同 
じ 内容の 文 を 異なった 文に してみ るの もい 
い 勉強になる。 

A) "君 は 近くの 森 を ぶらついて いると， 
誰かが し ていた 不思議な ジプシーの 嚟を思 
い 出した" 

B) "君が， 誰かが していた 不思議な ジプ 
シ 一の tf を 思い出し たの は， 近くの 森 をぶ 
ら ついている と きだった" 

元の 文の 語順で は， 近 く の 森 をぶ ら つ く 
ことと， ジプシーの ゥヮサ との 関係が 気に 
なる。 B) だと ゥヮサ を 思い出す こ とが メ 
インと なり， 森 は た だ その 思い 出 し た 行為 
を 補足す る だけにな つて， 文と してのお か 
しさはなくなる。 

3) 久しぶ り に 体 を 励 かした く なった 俺 は 
後先 を 考えずに 男 ど も と 乱闘に なった。 
(アルビ オンよ り。 Oh!X 2 月 号 27 ページ 
の 画面 写真 参照） 

主語 は "俺 は〜" で 単数 だから "乱闘 を 
始めた" くらいで ない とおかし い 力 s , "~ 
になった'' と はだい ぶ ニュアンスが 変わつ 


てし まう。 実は "俺 は 男 ど も と 乱 嗍 に な つ 
た" だけ な ら それ ほ ど おか し く は感 じ ない 
だろう。 意味 的に は 複数の 主語と して 読め 
るから だ。 ところが、 欲ば つてつ けた "後 
先 を 考えずに'' がまず かった。 これ は" 俺'' 
個人の 状況 を 説明す る も ので あ り ながら， 
文法的に は 複数の 行為者 を 主語に 持つ はず 
の '活し 闘に なった" という 述部 を 修飾して 
いるので ある。 より 詳しく 状況 を 説 I' リ 1 しょ 
う と したために 陥る 昆と いえる だろう。 

なお， "〜なった" を 生かす ための 簡単 
な 解決法が ある。 試しに， "考えずに" を 
"考えず，" に 替えて 読んで ほしい。 
4) ス一 「きゃあ ああ ああ あつ！」 
ピクト 「うわ ああつ！」 

スー 「ま， まぶし t 。 」 

( アーク ス II よ り。 Oh!X4 月 号 89 ページ 
右上の 写真 参照 ） 

べつに 文章が 悪い 例で はない が， この 台 
詞の 上の グラフ ィ ックは キャラクターが 抜 
いた 剣が まぶし く 光って いる 様 を 描いて い 
る。 つまり， まぶし いのは 絵 を 見れば 一目 
瞭然の こんこん ちき なので あ る。 ウルフ' 
チームお 得意の ビジュアル シーンが この 台 
詞 のお かげで 台 無 しにな つてい る。 せめて， 
"こ， この 光 は …… " というよう に 絵で は 
表せない 部分 を 想像させる よ う な 工夫が ほ 
しいと こ ろで ある。 

と， 身近な ゲームから 例 を 挙げさせても 
ら つた。 とりあえ ず， 画面 写真 か ら 認識で 
きる も のから 探した だけで こんなにあった。 
ゲーム 画面， ソフトの マニュアル， チ ラシ 
広告， どこも 「お 粗末」 な 文章で あふれて 
いる。 こんな 文 を 読んで 育ったら 悪文し か 
害け な く なる の は 目に 見えて いる ぞ。 

さて， 一般的な 問題に 入ろう。 

犯し やすいの は， 文の 構成が スパゲティ 
プログラム のよ う にグ チヤ グ チヤになる こ 
とで ある。 ひと つの 文章が 長 くな りすぎ る 
と ， FOR に 対応す る NEXT が あ り ません， 
てな こと になる。 


"焼けた アスファルト を 歩 き 疲れた 僕 は， 
開 け 放た れた 窓の 向 こ う で 仰向け に な つ て 
転がって いる 猫が 笑い， 長い 前髮に 隠れた 
伏し目 がちな 顔の 彼女が この 世の 全て を 許 
した かの よ うな 表情で それと じゃれあって 
いた" 

という， いま 思いつきで^ いた 文 ま i である。 
いや あ， 中学生で も 書かない ような ひどい 
文章 だが， まあ， 許して くれ。 この 文章の 
構造 を 見て みょう。 主語 は "僕" である。 
しかし， それに 対する 述語がない。 文が 長 
く な る 內 に （書き手が 忘れて しまって） 述 
語が どっかへ 行って しまつ たので あ る 。 
こ れカ f FOR に 対応す る NEXT がな い と い 
ぅャッ 。こ の 場合， "僕" の 行為の 中に" 猫" と "彼 
女'' の 行為が ある 入れ子な わけで， "僕" 
の 行為 だけが 完結 していない。 思いつきで 
書いて いると よくやり がち な ボケ だ。 

こういった 文章 はもつ と 短く， いくつか 
の 文に 分けるべき である。 そうなら ない の 
は， 頭に 思い浮かんだ 順番に 書いて いる の 
で， 書きながら 思いついたり 思い出したり 
した こ と を その ま ま 文に 付け加え るからで， 
推敲が 必要 だ。 

語順 を 少し 変える だ けで 兄^え る ほ ど 
すつ き り した 文章に な る こと は 多い。 

続いて よく ある 例が， 関係詞 的 な 構造 を 
入れた ばか り に 文が 複雑に な る ケースで あ 
る 。 元来 関係詞 的な 文 （〜すると ころの〜， 
つてい うやつ） というの は 現代語に はな 力' 
つ た も の だ。 英文の 翻訳が 一般的に なって 
以来の こ とで， 便利屋 的に 使う と 見苦しく 
なる。 

次 もよ 〈ある ；话 で， 倒置法の 乱用で あ る 。 
"〜であった， ~ だつ た が。 " つてい うや 
つで ある。 
上の 3 つ は どれ も 根っこ は 同 じ だ。 
"思いついた も の を 整理せ ず， 思いつい 
た 順番で そのまま 苦いて しまう ので， 文 全 
体の 帳尻 を あわせよ うとして， 複雑で 不 ほ I 
然な 文に なって しまう" ので ある。 


特集 I 日本語 を誊 くた めの 7 つの 方法 49 


思いつ くま まに 書く ことと， 感觉の 流れ 
を その ま ま 文章に する こ と と は 違う の だ。 

： 第 4 講 「^を 書かない ために」 

最初から そんな こ と を 気にして いて は 文 
章なん て 書け ない わけで， 書いて から 直す 
のが 基本で ある。 そのために はまず， 

"時間 をお いて 読み返す クセ をつ ける こ 
と" 

が 大前提で あり， さらに， 

' '自分で 書いた 文章が 悪文 かど うか を 知 
る こと" 

が 重要で ある。 特に 自分で 書いた 文章 は 
"その 文 を 書いた と きの 状況 や 心境 を 踏ま 
えて 読んで しまう'' から， 言葉の あいだに 
隠れた ニュアンス を 読み取ったり， 書き 間 
違いに 気づかなかったり し 力 s ち だ。 

最低限， 悪文 かどう 力'， この 文 はお かし 
い 気がす るな あと 思える ように な ると 次の 
段階で ある。 気がついても， なかなか 直せ 
る もので はない。 そのための コッ という も 
の は 確かに 存在す る。 
D 文体の 統一 を チェック する。 
です ま す 調 と であ る 調 を 混在 させない。 

2) 同じ 文末 を 続けて 使わない。 

文の 終わ り がすべ て " ~だ" だつ た り ， 
" 〜であ る" だったり すると， き れいで な 
い。 かの 三 島 ftl 紀夫 だって， 文末が "だつ 
た" ばか り に な るの を 防 ぐ た め に， 意識 し 
て 現在 形 を まじえたり していた という。 私 
でさえ， 同じ パターン を 繰り返さ ないよう， 
ときどき 体言 止め や 倒置， 疑問 形な ど を ま 
じえ るよう にして いる。 こういつ たこと は 
推敲 しないと 気がつかない。 

3) 代名詞の 使い方 を チェック する。 
"あきら は" という 主語が いくつ も 続く 

と く どい ので， "彼 は" にしたり， 主語 を 
省略した り してみ る。 

4) 40 字 以上の 文 は 2 つに 分けられ ないか 
考えて みる。 

ひとつの 文に た く さんの 主張 を 待たせて 
はいけ ない。 私 はよ くわ ざと 長い 文 を 書い 
たりす る けれど。 

5) 同じ 表現 を 何度も 使わない。 

6) 語順 を 変えて みる。 

語順 というの はリ ズム のために も , 簡潔 
な 文 を 書く ために も 重要で ある。 

7) 接続詞 を 全部 取つ てみ る。 
接続詞が な く て も わかる 文章 を 書ければ 

一人前 だ （これ は 大変 だ ぞ）。 

そんな こんなで， 文章と いう もの は プロ 
グラムと 一緒で， デノ f ッグを 重ねる とこ な 
れて よい ものに なって いく の だ。 


第 5 講 r カッコ いい 文章」 

いい 文章と 悪い 文章と いうの は 確かに あ 
つて， 前述の 三 島由紀 夫なん かが 名文と し 
てよ く 挙げられる けど， 無理やりそう 思う 
必要 はない。 文章と いう もの は 時代に 応じ 
て 変化して いく も ので あ り， 少なく とも 我 
々は 三 島の 時代と は 異なった 文化に いるか 
ら だ。 私が 現在 いちばん 綺麗な 文章 を 書く 
と 思う 作家 は 筒井 康隆 だ。 

私より 若い 世代 だと， それが 吉本 ばなな 
になって いるか も しれない。 

話し言葉が 変わる 限り， 書き言葉 も それ 
を 無視して はいられな いので ある。 

いま は 急激に 変わって き た 話. し 言葉と 書 
き 言葉の ギャップが 大き く なった ために， 
その あいだ を 埋めよう とする， 新しい 言 文 

一致 運動の 時代 だ そ うだ （科学 朝 ト1 8 月 号, 
「ネオ 日本語」 ）。 

という わけで， カツ コ いい 文章と いうの 
は， 書き手の 育った 文化に 大きく 依存す る。 
いまさら 三 ,»b 由紀 夫の 文章 を 勉強せ よと は 
いわない， し 力' し， 文章 を 書く 目的 を 表現 
の 伝達と 考えれば， なるべく 簡潔で 十分に 
必要な 情報 を 盛り込んで いる ものが いい 文 
章と いえよう。 

第 B 講 「言葉 は 記号で ある」 

いまさら 記号論で もない けれど， 言葉と 
いうの は， 共同 幻想の 上に 成り立つ 記号で 
しかない。 

だから， 書き手と 読み手との あいだで そ 
の 幻想が 成 り 立つ ていれば， ど ん な 言 菜 を 
使おう が 知った ことで はない。 逆に， 幻想 
が 成り立たない 言葉で いく ら 語られても 知 
つたこと ではない。 そういう ものである。 

古くから ある， すでに 意味 や 用法の 確立 
された 言葉が あれば， その 用法 を 逸脱して 
はならない， という こと だ。 言葉 を 崩す の 
が 流行って いる 力 f (例： 本章の 冒頭)， 元 


どんなに 文章が う まくても， 内容が な く て は 
週刊誌の 埋め草に し かな ら ない。 

内容と いうの は， 省いた 人の 視点 や 考え方が 
どれ だけ 読者に とって 面白い かで ある。 新鮮で 
あったり， 捻って あったり， 予想外の 展開 をし 
たり， といった こと だ。 

いまの 時代， ひとつの こと だけ を 極めよう つ 
たって （ひとつの 手で は あるが)， そうはい か 
ない。 上に は 上がい る。 じゃあ， どうす るかと 
いうと， 自分の 得意な 分野の 視点で ほかの もの 
を 見て みる， とか， 自分の 得意な 分野と ほかの 


の 意味 を 知らずに それ を やって も 見苦しい 
だけ だ。 

* ネ氺 
てにをは， と 力'， 接続詞の 使い方と か， 
そ う いった 実務 的な テク ニッ クを 求める 入 
に はかな り 拍子抜け した ことと 思 う が, 言 
葉が 流動的で， 誰 も が 普段 か ら 使って いる 
ものである 限り， 小手先の 法則に 意味 はな 
いの だ。 

^段， 乏しい 語彙で， その 乏し さ を 表情 
や 身 振 り 手报 り ， 互いの あいだで のみ 通用 
す る 隠語 や 造語 や 流行語で カバー している 
人 た ちが ひと た び 文章で な にか を 表現し よ 
うと 思う と， 途端に， 言葉 だけで 自分の 意 
見 を 表現す る こ とがい かに 難しい か を 知る 
だろ う 。 

我々 は 普段， 言葉に よる コミュニケ ーシ 
ヨン をして いると 勘違いし がち だが， 実の 
ところ， 言葉 以外の ちょっとし た 表情 や ら 
言い回し やら， 声の トーン や， つつかえ 方 
により 多く の 意味 を 求めて いるの だ。 

確 かに， 学校の 先生の 気に入る 感想文の 
書き方 や， 論现 的な （に 見える） レポ一 卜 
の 書き方 や， 上司に 受ける 報告書の コッな 
んて もの は^ 在す る。 入を感 勅させる 文法 
も 存在す る。 しかし， そんな 対症療法 にた 
いした 意味 はない。 どんなに 型 を 知った と 
こ ろで 語彙の 不足 は どうに も な ら ないし， 
んな もの はすぐ ばれる。 入 を 感動させる テ 
ク ニック を 駆使 したと ころ で， "一杯の か 
け そ ば" のように 下品 な 話が また 増え る だ 
けだ。 

それなら ば， 自 分た ちの 新しい 日 本 語 を 
作って いけば いいで はない 力'， と。 つまり， 

粘 : 神 論 を 踏 ま え ， 技術 は 生 まれてから 10 数 
年， 20 数年の あいだに 培って きた もの を 流 
用しょう と， そういう わけなの である。 

ここまで 書いて 読み返して みると， 自分 
の 文章に 悪文が 多い ことに 気づく。 だから， 
文章 を 書く と きの 最大の ボイ ン 卜 を 掲げて 
終わりに しょう。 

"自分の こと は 棚に 上げろ" 


分野 を 合体 させて 新しい ものが 見えて こない か 
探って みるの がいちばん てつと リ ば やい。 

人 は 自分の 知らない こと は 害け ない. の 法則 
によって， そうそう 独創的な 考えなん て 出て き 
はしない。 それでも 人の 経験. 人の 知識 は それ 
ぞれが ユニーク （唯一） な ものである からに は, 
自分の 考え を 持つ こと は 可能で ある。 あらゆる 
事象 を 自分で 解釈し ようと 思って いれば. おの 
ずから 自分の 考えと いう ものが どういう もの か 
はわ かってく る。 隠れた 意志 を 知れ， という こ 
とだ。 


自分の 考え を 持つ と は 
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Nakano tbhuichi 
中 野 修ー 


X68000 に 標準で 付属す る WP. X。 マウス オペ レー シ ヨン を 重視 
し す ぎた ため か， バランス を 崩して しまった ように 見える とこ 
ろ も ある。 ニニで は 日本語 フロ ン ト プロセッサ ASK68K と と も 
に 賢い 使い方 を 摸索 してみ よう。 


タ コ と 呼ばれて 久し い X68000 の ワープ 
口です 力す， 確かに ちょっと 変な と こ ろが あ 
り ます。 それ は 「j 本 語 変換 フロン ト プロ セ 
クサ ASK68K に 起 ほ 1 する もの, ワープロ |'| 
体の 仕様に 起 [大 I す る ものな ど さま ざまです。 
まず， ASK68K を 見て みましょう。 わか 
^ らな いもの ま で 無理矢理 変換 しょう とする 
理 ので， 変換 後に 手動 操作が 多く 必要になる 
とか， 2 文節お- M -致 法と いう アル ゴリ ズ 
ムで連 文節^ 換を 行 うに も 1ぉ わらず， 辞書 
の 作 り 方が 無 語 変換 的な もので しかない と 

^ レ^ ^is^ きます。 

私た ち が 使 う 日 本 語に は 漢字の 部分 と 力 
タ カナ， ひらがなの 部分が あります。 ^然， 
ひ ら がな で 誓 くべき 単語と いう もの も ある 

わけです が， 600K パイ ト 以上に も およぶ 膨 
大な 辞書の 中身 は ほ と ん どが 漢字 を 使つ た 
単語な のです。 基本的に 漢字に する 必要が 
ある 部分での み 使用 し， 変換の 必要がない 
部分 は 手 作業と いう 方針の よ うです。 


遅い と いわれた ASK68K も ver.2.0 に な つて か 
ら はかなり 高速に なった。 特に フロッ ピ一 ディ 
スク ゃハ一 ド ディスク 上での 使用 速度 は 格段に 
向上して いる。 X 68000 の 標準 ワープロ では スク 
ロールの 高速 さと あいま つて 速度 だけ は 快適な 
環境が 得られて いる。 が、 ワープロ は そのまま 
ではち よ つと 使いに く い。 

たとえば 入力 時に 枠が 開く と 位置 揃え や 修正 
の 際に 邪魔になる。 不便 だ。 

ASK68K の 辞 害 は な に が な ん でも 漢字 に し た 
がる 傾向が ある。 しかしながら， 普通の 文章に 
は 漢字 も 多い が， ひらがな だって 多い もの だ。 
そ 二で 無 変換 モー ド。 漢字. が 必要な 部分で だけ 
漢字変換 を 行い， 漢字が 必要ない ときには ひら 
がな のま ま 確定して しまう わけ だ。 これなら 最 
小 限度の 変換 作業です む。 

お， なんとなく 普通の ヮ一 プロつ ぼくな つた 
ぞ。 おお， し 力、 も， ひらがな 部分の 確定に は， 
いにしえの 即戦力と 同じ TAB キーが 使える （夕 
ブを 設定して ない とき は）。 
暴 学習なん かいらない 

無 変換 モード は 辞 害の 先 読み をし ない。 その 
分， 入力が 軽くな り， 変換が 重くなる。 しかし， 
漢字の 現れる 部分で し か 変換 し ない の だか ら ， 
変換 操作の いらない ひらがなの 分 だけ 変換 は 車圣 


澳卞 変換 システム とすれば これで もい い 

ような もします が， 「I 本 語処现 システム 
とすれば 問題が あります。 なにしろ， ひら 
がな や カタ カナで^ したい 単語が すべて 変 
な 当 て 字で 出 力され るので すから。 これ は， 
ひらがなの 単語 は 端から 登録して い く こ と 
であ る 程度 解決 さ れ ます。 もっとも 利 1 1 な 
の は 必要な 部分し か 変換 しないと いう こ と 
でしよう。 

また， 文法 解析が ir く， 当然 推測で きる 
単語が 変換で きなかった り もします。 いく 
ら 文節 を 切り直しても 必要な 単語が 出 て こ 
ない 場 介 も ありま す。 た と え ば， 単に， 

美し さ 
とすると， 

& ッ クシ さ 
と 変換され てし まいます。 形容詞の 語幹に 
「さ」 をつ ける と 名詞 扱いされ ると いう こ 
とが 徹底され ていないよ うで， 文^ 巾で も 
たま にお かし く な り ます。 形容詞の 語幹に 

編集者 御用達 「無 変換 学習な し j 

くな つてい ると も 考えられる わけ だ。 これで 速 
くな つた …… ， いや， 変換 終了 時に 余計に 時間 
がか かる ぞ。 
さて， 思い切って ここで 辞 害の プルダウン メ 
ニュー を 開き， 辞書 学習な しに 設定す る。 途端 
に 軽くな つた はず だ。 学習な しで 大丈夫な のか 
という 心配 も あるだろう。 実は この 学習 あり/な 

しとい うの は ASK68K の ディスク 学習， メモリ 学 
習に 対応して いる。 

さて， こ 二で ワープロ を 立ち上げ， 無 変換 学 
習な しの モードに する。 そして， 適当に 文章 を 
変換して みる。 変換 モード を 逐次な どに 変えて 
みる。 なにも 起きない。 辞 害 を 学習 ありに 設定 
する。 なにも 起きない。 変換 モード を 無 変換に 
戻す。 すると メモリ 上の 学習 内容が ディスクへ 
転送され るの がわ かる。 ゆえに， 文 害 変換 時に 
学習 モ一 ドに する 必要 はない。 

もっとも， ディスクに 学習し なくと も， しば 
ら く 学習つ きで 鍛えた あとなら 学習な しで も 十 
分に 使える 辞 害に なって いる はず だが。 
• 無 変換の 注意 

二れ でかな り 高速な ワープロ と して 使う こ と 
がで きる ようにな つたわけ だが， 無 変換 に は 意 
外な 罠が ある。 メモリ 学習が 重くな つてく ると 
「変換 ウィンドウ を 開いた まま， 次の 文字の 入 


「 \ ナ"」 をつ け た 形 容 動詞 形 の 場合 は ほ ぼ 全 
減です。 わざわざ 「I リ 1 る さ」 のように 名詞 
で 別 登録され ている 場合 も あり ます。 

その ほ 力、 動詞の 連用形 はぉ詞 として 使 
える というの も 利 川され ていないよ うです。 
結果 と し て 辞 誉が肥 大 化す る わ り に は 取 り 
こぼしが 多く なって います。 

一方， 標準 ワープロ では， マウスの 使 川 
を 強制され る こと や コント ロール キーが ほ 
とん ど サポ一 卜されて いない こと， 禁則の 
際の カーソル 移動が おかしい， 变換キ 一を 

押 し 統け て b 次 候補が 途中で 止 まって しま 
う な どの 問題点が あ り ます。 細かい こ と を 
挙げれば き り が あ り ま せんので 適当な と こ 
ろで やめて おき ましょう。 

では， X68000 の 日 本 語 環境 は どうしょう 
も ない のでし ようか？ 

幾多の 問題点に も かかわ らず， Oh!X の 誌 
面の ほ とん ど は X68000 の 標準 ワープロで 
作られて いると いうの も 事実です。 なぜで 


力 を もって 確定に 変える」 場合に ローマ字 かな 
変換 を 失敗す る ことがあ るの だ 。たとえば， 「こ 
二で j と 入力した いのに 「K おこで」 のように 
なる ことがある。 いったん 二うな ると， 同じ 症 
状が 多発す るよう になる。 

これ は ASK68K をセッ ト アツ プ する 際に， DEF 
C0NT = I に 設定す る ことで ある 程度 抑 えられる 
よう だ。 それでも 症状が 出た とき は 変換 モード 
を一 度 ほかの モードに 切り替える とよい。 当然 
の 二と ながら 変換 時に 確定して いく 癖 をつ ける 
のがい ちばん 確実な 対処 方法 だ。 なお， 普通の 
キ 一設定 なら， リターン キ一， XF2, XF5, CTRL- M 
のい ずれ かで 確定され る。 

さて， たくさんの マシンが 使え， 隣近所の 編 
集 部に 声をかければ， たいていの ワープ ロソフ 
トは 試用で きる， そういった 環境で も 日々 WP.X 
は 使われて いる わけ だ それ は， いまや MS-DOS 
よ り Human68k の ほうが 快適 だとい う こと， そし 
て， ひたすら 入力して いく 作業 は ともかく， す 
でに ある 文書 を 編集して い く 場合に は WP.X は 
非常に 极 いやす いという 二と による。 

あと は 新 感覚の ワンバ ゥン ドス クロー ルバ一 
ほか， 数十 個、 の 不都合 さえなければ いい ワープ 
口になる のにね え。 （U) 
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降 は 変換 速度が 大幅に 向上 してい ますの て， 

RAM ディ スクは 必ず し も 必要で は あ り ま 
せん。 辞書の 先 読み をし ない 無 変換 モード 
でさ え， ハ一 ド ディ スク なら RAM と 比べ 
て 遜色ない 速度で 変換 を 行って く れ ます。 

ディ スク ドライ ブの 構造 とデ イス ク 管理 
の 都合から， 高速 アクセスした いもの は 連 
続 領域に 置 く のが 基本。 ハー ド ディ スクに 
辞書 を 置く 場合 は， 専用の 辞書 ドライブ を 
設定す る こと をお すすめし ます。 フォー マ 
ッ トの 際に 2M バイ ト も パー テー ショ ンを 
切って おけば 十分で しょ う。 

ASK68K の メ ィ ン 辞書 は 内部に フ リ ― 
エリア を 確保して いますから 再編成す る ま 
で 大きさ は 変わりません。 し 力' し， サブ 辞 
書 は どんどん 大きくな ります から， 途中に 
ほかの フ アイ ルが割 り 込まない よう に 隔離 
してお くわけです。 確実に 連続 領域に 配置 
する に は， 莨 新しい ディスクに 辞書 フ アイ 
ル だけ を 置いて お く よ う にす るの が もつ と 
も 効果的な のです。 

フロ ツビ 一^ ： ースで 使用して いる 場合な 
ら， B ドライ ブま たは RAM ディ ス ク に 辞 
書 を 置 くこと になります。 当然， フロッピ 
一に 比べ， RAM ディスク は 非常に 高速で 
す。 ASK68Kver.2.b 以降な ら フロッ ピーで 
も 十分 使えます。 

ただ， もはや 2M バイトで 辞書 を RAM デ 
ィ スクに 置く の はおす すめで きません 
(RAM が もったいない）。 標準 ワープロ 専 
用で 起動す る 場合なら いざ 知らず， RAM 
ディスク に 割 り 当てられる メモリが あるな 
ら ， 作業用 ドライブ として 使う ほう がな に 
力 ' と 便利 ではない かと 思 われます （使用法 
にもより ます 力り。 

辞書の 鍛え 方 

変換され なかった 単語 は 片っ端から 登録 
する， これが 基本です。 同様に 勝手に 変換 
されたくない 単語 も 登録し ます。 変換 直後 
は 学習 効果の ため 登録な しでもう まく 変換 
して くれます が， それ 以後 も 変換して くれ 
る 保証 は あ り ません。 

WP.X の 単語 登録 は 範囲 指定 して 登錄キ 
一 を 押す だけです ので 非常に 簡単です （キ 
一 ボー ド だけで 操作で きる 数 少ない 機能の 
ひとつ）。 WP.X 上で は 名詞 関係の 登録 し か 

でき ま せんので， 動詞 や 副詞な ど はとり あ 
えず メモして おき， あとで まとめて 登錄し 

ましょう C 

ASK68K の 辞書 ディ ス ク に収錄 されて 
いる 単語 は 表 2 のとお りです。 数字 関係の 
部分 を ダンプして みれば 数詞の 0 個 という 


しょう？ それ は， つまり こ こで 挙げた 問 
題 点 はちよ つ と した 工夫 や 辞書の 鍛え 方で 
かな り 改善され る という こ とです。 

せっかくの 日 本 語 環境， 少 しで も 上手 に 
使う こと を 考えて みま しょう。 

| ASK68K の カスタマイズ 

S 初にすべき こ と は ASK68K の バー ジ 
ョ ン 確認です。 必ず 2. 01 を 使用して く ださ 
い。 初期 パージ ヨン は 時折， 人生 を はかな 
んで 遠い 旅に 出る という 典雅な 趣味 を 持つ 
ていました 力 5 , 最近の もの はそう 世間 知 ら 
ずで も あ り ません。 

さて， 八51«81<；のバージョン2.00以降で 
は 環境 ファイル を 設定す る こ と によ り 漢字 
変換 時の キー 操作 を ユーザーが 力 スタ マイ 
ズ する こと がで きます。 表 1 が もっとも 標 
準 的な ENV1.ASK です。 これ 以外に もい 
く つかの 定義 例が 見られます。 

まず， この ASK68K の 標準 設定 を 見て み 
ましよ う。 X68000 の キーボード 自体が 日本 
語 入力 を 意識して 設計 さ れた も ので あ り ， 
ASK68K も これに あわせて 作られた ため 
力'， 相性 はかな りよい よう です。 特に 文節 
の 移動 や 切り直し （要するに XF1.2 の 使い 
方） はずば 抜けて 優れてい るよう に 思え ま 
す。 この あた り は わざわざ キ 一ボードに 馴 
染まない 方式に 変える 必要 はないで しょ 


もっとも 朮 要な の は， 終 行の DEF 
CONT を 1 にす る こと， です。 これ はかな 
漢字変換 時の 1 行 ウィン ドウが 未確定で も 
次の 文字列 を 入力で き る 機能です。 これ を設 
定 せずに Hyperword を 使う とちよ つとう 
つとう しい ことになります。 標準 ワープロ 
でも これ をして おかない と 無 変換 モー ドで 
の 変換' I' に ローマ字 変換 を 失敗す る こ とが 
多い ので 必ず 設定す るよ うにして く ださい。 
そのほか エディ タ など を 使う 場合 も この 変 
更が 有効です。 

あと， XF5 キーと いうの は 人間に 押せる 
キーで は あ りません から， ENTER (確定） 
の 機能 は 再定義す る 力'， リターン キーで ft 
用し ます。 そのほか は 好みで DEFECHO を 
設定す ると 力'， その 程度し かいじる 必要 は 
ない と 思います。 

この ファイル をい じれば， ファンク ショ 
ン キー， コント 口一 ル キー， 変換 キー， 力 
一 ソル 係 キーな ど， ほぼ 思い どお り の 変 
換 キー 設定が でき ます。 ただ， TAB キーに 
ついて は 機能 割 り 当 て がで きないよう です 
(バグ"。 

さあ， こ れで 最低限の 設定 は 終わ り です。 

辞書 は どこに あります か 7 

ハードディスク をお 持ちです か？ 辞書 
は ど こ にあ ります か？ 
Human68k ver.2.0 と ASK68Kver.2.0 以 


表 1 

ENV1.ASK の 設定 例 據能 説明 （0/1 に 対応） 


BEGIN=CTRL+XF1 

END=CTRL+XF1 

XFER=XF3 

ENTER=XF5 

TYPE=F10 

DEL=DEL 

RIGHT=RIGHT 

LEFT=LEFT 

HOME=HOME 

CLiR=CUi 

CODE=F7 

LEARN=F9 

DIC=F8 

HIRAKATA=XF4 

ZENHAN=SHIFT+XF4 

NEXTKOUH01=RIGHT 

NEXTKOUH02=XF3 

NEXTKOUH03=SP 

BACKKOUHOlrLEFT 

BACKKOUH02=SHIFT+XF3 

BACKKOUH03=NULL 

NEXTBLOCK=DOWN 

BACKBLOCK=UP 

SH0RTER=SHIFT+XF1 

LONGER=SHIFT+XF2 

NEXTBUN=XF2 

BACKBUN=XF1 

ECHO=F6 

DEFECHO=0 

DEFROME=l 

DEFZEN=1 

DEFHIRA= 1 

DEFINS=0 

DEFALL=1 

DEFMEM= 1 

DEFCONT=0 
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の は 実に 納得で きます。 

一説に よると， 名詞 を 形容動詞 複合 名詞 
にす ると ヒット 率が 上がる といい ま す。 
^しに 固有名詞 を 除く すべての 名詞 を 形容 
動詞 複合 名詞に 変更して みま した。 若干， 
助詞の 判定が よ く なった かも しれません 力 ' ; , 
前の 辞書が すでに 助詞 対策され ていたので 

(「と」， 「の」， 「力り などの 助詞 を 名詞と し 
て 登録して おく ）， あまり I 三 1 立った 違い は 見 
られ ませんで した。 とりあえず 新しく 登録 
する 単語 だけ 形容動詞 複合 名詞に し ておけ 
ばいいで し よ う。 

こうして， 漢字変換 も 使い込んで いくう 
ち にかな り ヒット 率が 上がって い きます。 

なお， 新しく 登録され た 単語 は 辞書 内部の 
フリー エリアに 格納され ます。 フリー エリ 

ァ がな くなる と， 変換 時に 異様に 時間が か 
かってき ます。 辞書 はまめ に 再編成し ま し 

あと は 無駄に 思える 単語 は 削ります。 あ 
なた は 辞書の 中身 を 見た こ と は あ り ます 


か？ DICM.X を 起動し， 単語 一覧 を 選択 
してく ださい。 たとえば， 開始 位置 を "あ 
さ ひ"， 終 了 位^ で は リターン を 人力して み 
ます。 なに か 疑問 を 感じません か？ 次に 
開始 位置 を" さんきろ め一 とる"， 終了 位置 
では 単に リターン を 押してく ださい。 c 

さあ， 削れる もの はみ な 削りましょう。 
村 田 氏の ュ一 ティ リ テ ィ が 便利です。 

もっと 速く 

スクロール 速度 を 上げる 手っ取り早い 方 
法と して， キ 一人力の ウェイト を 調整す る 
手が あ り ます。 方法 は 簡単， SWITCH.X を 
起動 して メモリ スィ ツチの FirstKey と 
NextKey を 変更 します。 Oh!X では First 
Key を 1， NextKey を 0 く らいに する のが 
流行って います （キー ウェイ トを変 E する 
と， ちょっと だけ Yet Another Column が 
有利になる かも しれません）。 

ただし， この 変更 を 行う と， キー を 長 時 


ェテ: < 夕^ 日本語ワープロ 

あるいは MicroEmacs 賛歌 


世の中に は アンチ ワープロ 派と いわれる 人々 
が 存在す る。 彼ら は 日本語の 文書 を 寄く のに 決 
して ワープロ を 使わない （状況に 応じて 否応な 
く ワープロ を 強制され る こと はあって も， 束縛 
から 解放され る やい なや 彼らの 魂 は その 故郷へ 
と 帰って いく）。 作家が 使い古した 万年筆 を 執筆 
の 友と する ように， 手に 馴染んだ エディタの 元 
へと 回怫 していく ので ある。 

エディタ は プログラム を 入力 • 編集す る 道具 

と して 進ィ 匕して きた。 作成され る FORTRAN のプ 
ログ ラム は ときには 数万 行に 及び， LISP の プロ 
グラム は ゾ ッ とする ほ どの 括弧 と インデント を 
従えて いる。 これら 強者と 対等に 渡り あう だけ 
の 能力 を 人々 は 求め， エディタ は それに 応えて 
見事 強敵 を 打破して きた。 

そのな かで 「二れ は エディ タ というよ りむし 
ろ 環境と 呼んで いい」 と 高く 評価され ている も 
のが ある。 UNIX の 世界で あまねく 知られた 
Emacs である 。高機能 さ 柔軟 さに 加え， 特異な キ 
—割り付けが， いったん 染まって しまった 者 を 
ほかの エディ タ から 遠ざけ 続ける。 

二れ ほどまでに 人々 を 魅了す る 秘密の ひとつ 
は， Emacs が 備える すべての 機能が ユーザ一 に 
開放され ている ことだろう。 キー 割り付けの 変 
更 はもと より， 自分に 必要な 機能 を プログラム 
しそれ を 好みの キ一 に 割り振る などが 簡単に で 
きる。 マクロで はない。 Emacs Lisp である。 

Emacs が课境 だとい ぅ赘辞 は， 専用の エディ 
タ を 構築で き る と いう 魅力 だけにと どまらない。 
編集 中の テキス トは バッファと 呼ばれる 領域に 
読み込まれ ディ ス プレイに 表示され ている が， 
なんと， この バッファの 中で シェルが 動く ので 
ある。 キーボードからの 入力 は 普通の テキスト 
と同じように バッファに 入力され. リターン キ 
—を 押す と 同時に コマンド として 実行。 その実 


泉 大介 


行 結果 も 同様に バッファ 内に 残る。 必要なら 
Emacs の 高 度 な 編集機能 を 駆使して それら を 加 
ェし， もう一 度 シェルへの コ マン ドと して 実行 
できる ので ある。 I 行 入力し かで きなかった ブ 
ログ ラミング 言語が， たちまち フル スクリーン 
エディ タ つきの 言語へ と 変身す る。 


MicroEmacs 


この 強力な エディタ Emacs は， その サブ セッ 
卜が パーソナル コンピュータ にも 移植され てい 
る。 電脳 俱楽 部で も 配布され た MicroEmacs であ 
る。 シングル タスクの Human 上で 動 く ため， パッ 
ファ 内で シェル を 起動す る こと はで きないが， 
ユーザ一 に ほとんどの 機能 を 開放 するとい う 姿 
勢 は 堅持され ている。 Lisp ではない が マクロ 言 
語 を サポートし ており， 足りない 機能 をブ ログ 
ラムに よって 補う 二と が 可能な ので ある。 

たとえば GNU Emacs に は dired という コ マン ド 
が ある。 これ は ディレクトリ エディタ を 略した 
もので， 任意の ディレクトリ を 表示しながら， 
編集す る ファイル を カーソル で 選択す るコ マン 
ド である。 サブ ディレクトリの アップダウン は 
もちろん， ファイルの 削除まで サポート してい 
る。 標準の MicroEmacs にこの 機能 はない が， 私 
の MicroEmacs では dired が 動いて いる。 そう。 マ 
クロ を 使って 定義した の だ。 その他， Human の 
コ マン ドを バッファ 内から 直接 起動す るなん て 
マクロ も ある。 こうして すでに MicroEmacs は 私 
にと つてなくて はな ら ない 環境に 成長 し た。 

手塩に かけて 成長 させた 高機能な エディ タは 
体の一 部と いっても いい。 必要に応じて 作成し 
た マクロ は， 自分の 使いやすい キーに 割り振つ 
て ある。 既存の ワープロ を 使う こと は， これら 
すべて を 破棄す る 二と なので ある。 


MicroEmacs の 日本 1舰 理 


このよう に 強力な MicroEmacs だが， 難点 もな 
いで はない。 その 最 たる もの は 日本語 入力 時に 
字詰め を 決められな いという 点であった。 バー 
ジョ ン 3. 3 に は 指定され た 文字 数よ り はみ出す 
単語 は 入力 と 同時に 次の 行へ 送 られる WRAP モ 
― ド （英文の 自 動 字詰め 機能） が 備わ つていた が, 
二れ は 日本語で は 動作し ない 代物だった。 

バージョン 3. 10 (「さんてん じゅう」 と 読む） 
で 改善が 加え られ， X68000 用の MicroEmacs では 
二の WRAP モ一 ドが 日本語で も 使える よ う にな 
つたので ある。 単に 文字 数 を 揃える だけでなく 
禁則 処理まで 行って くれる。 編集 を 指向した ブ 
ログ ラムが 字詰めと いう 入力 指向の 機能 を 手に 
入れた ので ある。 ただ 残念な ことに 桁 揃えされ 
た 各行の 最後に は 改行が 入って しまう ので， テ 
キス ト ファイルに する 場合に はこれ を 取り除か 
なければ ならない。 

なぜ ワープロで 文 害 を 作らない のかと 疑問 を 
お持ちになる 方 もい るだろう。 私に とって， 
もの を 書く と きに 大切な の は 思考 を とぎれさせ 
ない ことで ある。 入力した 文字 は 読み直され， 
吟味され， 修正され， そして 文章と なる。 推敲 
の た びに マウスに 手 を 伸ばさ な ければ な ら な か 
つたり， 力一 ソル キーまで 手 を 伸ばさなければ 
ならなかったり， ファンクション キ一 から メニ 
ユー を 選ばなければ ならなかった りする の は 推 
敲の リズム を 乱す 以外の なにもの でもない。 万 
年 筆で 小説 を 書く ときに， 削除す る 部分 を 修正 
液で 消す だろう か。 カバ一 する 大きさの 原稿 用 
紙 を 切 り 抜いて 貼 リ 付ける だろ う 力、。 

もし あなた 力、' 華麗な 装飾 を 施した， 見る 人 を 
魅惑す るよう な もの を 作り たいと 思う のなら ヮ 
—プロ を 使う のがい い。 もし あなたが 羅線を 駆 
使した 体裁の よい 表 を 作りたい と 思う のなら ヮ 
—ブロ を 使う のがい い。 しかし， もし あなたが 
本当に 文章 を 「害きたい」 と 思う のなら， Mi 
croEmacs をィ 吏う ベ き である。 


表ョ 辞書 ディスク ve「.2.0 の 内容 
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図 1 X68K—M.DIC の 構成 


図 3 見出し語 コード 



0 H — 00 1 FFF H インデックス 領域 

(IE00 以降に フラグ 領域？） 

辞 害の 本体 
ただし， I ブロック- 1024 バイ ト 


図2 X68K_MIDIC の 辞書 ブロック 内部構造 

I 1024 バイ ト 


全体の 長さ L 0 
(2 バイ ト） 


見出し語の 長さ 
し （I バイ ト） 
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半角 
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全/半角 


登録 語 

/品詞 1 バイ ト、 
1 を 前に 置く 1 


全体の 長さ 

(2 バイ ト） 



全体の 長さ L 0 は 下位' 上位の 順で 記録され ている。 また 1024 バイ 卜に 満たない 部 
分 は "00 H " で 埋められる 
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間 押し 続け た 場合に 画面の ス クロ 一 ルがキ 
一に 追いつかず キー を 離しても しばらく ス 
クロールが 続 〈ようになって しまいます 
(要す る にパッ ファ がた まる）。 どうしょう 
もない とき は シフト + ブレイ クで 止めて く 
ださい。 

ASK68K の 辞書 構造 

1988 年 2 月 号で X68000 に Xlturbo 用の 
辞書, WORD POWER を 移植す ると いう 記 

事 力 f 掲載され ました。 同時に sm' 者の 長 井 

氏が 解析 し た X68000 の 辞書 構造が 発表 さ 
れ ています。 

辞書の 構造に ついて， ざっと 解説して お 
きましょう。 辞書 はィ ンデ ックス 部分と 本 
体に 分かれ， 辞書 本体に は 登録 語が 入って 
います （当たり前）。 これ は 読みが な 順に 並 
ベら れ ており， 頭 か ら 1024 バイ ト ご と に ブ 
口 ック 分けされ ています。 

辞書の 先頭に は インデックスが あり， ダ 
ンプ してみ る と 各ブロ ックの 最初の 見出し 

表 3 


語 （の 8 文字 分） 力 5 ' 整然と 並んで いるの が 
わかる でしよう。 ただ し ， こ れは ASK68K 
の 内部 コードで 記述され ています ので， 読 
むた めに は コード を 変換し なければ な り ま 
せん （図 3)。 

辞書の 先頭の 2000h バイ ト 目から 辞書 本 
体が 始まります。 この 部分 は， ある 読みに 
対す る 熟語の グループが 集 まった も のです。 

最初の 2 パイ ト がその 読みの グループ 全 
体の 大きさ を 表し， 次に 見出し語の 大きさ 
( 1 バイ 卜）， 内部 コード 化さ れた 見出 し 語 
本体が 続' き ます。 そ して 登録 語です。 1 パ 
ィ トの 品詞 情報の 後ろに シフ ト JIS ( + 
ASCII) コー ドの 登録 語が 並んで い ます。 同 
じ 読みに 対して 複数の 語が 対応す る と き は， 
後ろに 品詞 コー ドと 単語が 続いて いきます。 
品詞 コード は IEh 以下の 通常 コントロール 
コード と して 使われる 部分に 配置され てい 
ますので， 登録 語の 分割 は 簡単です。 

単語の 読みから ィ ンデッ クスを 検索 すれ 
ば， 辞書の どの ブロックに 目 的の 語が 入つ 
ている かが わかります。 その ブロック を 読 


( 姓 ） 
名 

名 
名 
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図 4 登録 語/品詞 コード 


品詞 


動詞 （カ行 5 段） 

01 

1! (ガ // ) 

02 

// (サ // ) 

03 

// (タ It ) 

04 

// (ナ 11 ) 

05 

// (/< // ) 

06 

// (マ // ) 

07 

！! (ラ け ) 

08 

// (ヮ II ) 

09 

It (サ行 変格） 

0A 

// (カ行 変格） 

0B 

// (上下 一段） 

OC 

形容詞 

0D 

形容動詞 

0E 

形容動詞 複合 名詞 

OF 


品詞 コ一ド 

サ変 複合 名詞 10 

名詞 1 1 

単漢字 12 
人名 （姓） 13 


み 込み， 対応す る グループ を 探 • し て 候補 群 
としてい ます。 どれ か 単語が 選択され ると 
その 単語 を サブ 辞書に 登録して 「学習」 を 

します。 

プログラマ一 ズ マニュアル では 日本語 F 

P の ファンク ショ ン コールが 公開され てい 
ます。 ユーザー にも 日本語 処理 プログラム 

を 作れる 可能性 は 十分 あ る わけです。 

* * * 

齚線 関係， 記号 入力 や 外字 作成な どは完 
璧 といって いいでしょう。 字詰めの 変更が 
これほど 簡単な ワープロ は ほかに まずない 
でしよう。 加えて マウス に 割 り 当てら れた 
機能の 使いやす さは 国産 ソフ 卜屮 でも 屈指 
の ものが あります （その 分， キーボードの 
使 し 、 方が 下手 な の が 残念です ） 。 

ASK68K は 使い込ん でい くこと で どん 
どん 確実な 変換 をす るよ うになります。 鍛 
えられた 辞書 は ユーザーの 財産 となります。 
皆さん も， 自分な り に ASK68K と WP.X を 
う ま く 使いこなして ください。 


詞名体 詞名体 体 000000 

名人 団名 地団団 名 名 名 名 名 名 


Kk キ Kk キ 


S 称 

i 名 名 語^-ほ 詞 

/名 体の 詞字尾 勳続詞 体 

. '地団 物 数数 接 感接副 連 


それでも 私 は Hyperword を 使う 


私， 荻窪圭 は， Hyperword で 原稿 を 書く。 人 は 
それ を 見て 驚く。 つまり， "遅い ソフ トは それ だ 
けで 存在 価値がない'' と いった 神話が 生きて い 
るからで ある。 

Hyperword は 確かに 遅い。 - スクロール や， 変換 
時の 反応が 遅い。 し 力、 し， 「狭い 紙面， そんなに 
急いでな に を 打つ」 である。 おっと， 反論が き 
た。 「迫る 締め切り。 そんなに のんびりし てられな 
い」。 囷 つたな あ。 でも， そうまで して 速い もの 
が ほしいで すか？ 

Hyperword の カス 夕 マイズ 

Hyperword は 非常に わが ま まな ワープロ。 使用 
する 瑰 境が 悪い ととても 使う に 耐えない し， 琛 
境 を 整えと けば， それなりの 力 を 発揮す る。 槻 
能の 贫 弱さ を 速度で 補う の も 手 だ 力 S その 逆 も 
また 有効な の だ。 

Hyperword を 使う に は 2 つの ポイントが ある。 
ひとつ は どれ だ け Hyperword の た め に 資源 を 割 
ける か， であり， もう ひとつが， カスタマイズ 
である。 

前者 だが， Hyperword は 実 に 頻繁 に 中間 ワーク 
ファイル を 作成す る。 こればかり はいかん とも 
しがたい。 よって， RAM ディスク を 使用す る。 私 
は 256K バイ ト ほど そのために RAM を 使って いる。 
RAM ディスクが I ドライブ だとす ると， 立ち上げ 
時 ォプシ ョ ンに' '—wl" をつ ければ いい。 さらに 
Hyperword は プロ グラム サイ ズが 迷惑な ほ ど大 
きいので， ハードディスクに 入れる と 起動時の 
イラ イラが 少なくて すむ。 

続いて 後者 だが， Hyperword は 環境 ファイル を 
持って いる。 私の 使って いるものが 図 I である。 
こいつが ポィ ン トだ。 

右 半分に コメ ン ト のつ いている ャッが シス テ 
ム について くる キ一 バインド である。 ただ 数字 
を 害いて あるの が 私の 追加した 分 だ。 数字 は 機 
能コ一 ド であり， Hyperword 独自の ものである。 
96 が 行末， 95 が 行頭への 力一 ソル 移動， 106 は 力 
—ソル 位置から 行末まで 削除， 18 と 19 は I 行 口 
ール アップ/ダウン である。 Hyperword が あら か 


Ogikubo Kei 


荻 窪 圭 


じめ 用意して いる 機能 だけ だが， こうして カス 
タ マイズ 可能 だ c 

ユーザ一 カスタマイズした キー は XFI キーフ 
アン クシ ヨンと なり， あら かじ め Hyperword がシ 
ョ一ト カツ トキ 一と して 用意した もの は CTRL 
ファンクション となって いる。 エディタ を 使い 
慣れて いる 我々 にと つて これ は 非常に 不便で あ 
る。 

ここで 登場す るの が" 一 x' 'オプション だ。 二の 
オプション をつ けて 起動す ると， ユーザー カス 
タ マイズし た 機能が CTRL ファンクション にな 
り， Hyperword の ショート カツ トキ一 力 ;XFI にな 
る。 便利で ある。 

最低， このく らいの 瑰 境が 必要 だ。 標準 ヮ一 
ブ 口 が CTRL フ アン クシ ヨン を ほとんど サポ一 
卜して いない こと を 考えれば， 二れ だけで もう 
れ しい。 

| 私 はこう 使う 

さて， 二の 環境で Hyperword を 立ち上げよう。 
すると， 横 19 文字で （半角 だと 38 字） "新規 文 害 
に ウィン ドウが 開く。 Oh!X の 原稿 は 横 19 字が 基 
本な ので， 標準 害 式と して 登録して あるの だ。 
新規 文鲁 I に タイトル を 書き， おもむろに， 
「本文」 と 「メモ」 の 2 つの 目次 を 作る。 本文 
の 下に 思いつい たもの を 片端から 害き な ぐ り， 
XFI+0 で 本文 シ一 ト を 開いて， メモ を b とに 本 
文 を 害く。 

まだ Hyperword に 懐疑 的な 向き は 多い。 確か 
に， 印刷 系が 弱い とか （縦 害き 印刷が できな 
い）， ファイル 操作 系が 弱い とカゾ ディレクトリ 
名まで は自 分で 打た な ければ ならない） いう 欠 
点 は あるが， 文章 作成 支援 道具と 思えば， それ 
ほ ど 気に はならない。 

Hyperword は マウス を 使った オペ レー シ ョ ン 
がゥリ だと 思われて いる 力 S そうで はない。 マ 
ウス は 気が 向いた と き や ウイ ン ドウ 操作に し 力、 
使わない のが 常 だ。 

たとえば 範囲 指定 は XFI + カーソル キ一 を 使 
う。 削除した いとき は DEL キー， ク リ ッ プ ポー ド 


へ カットし たいとき は XFI +X, コピ一 は XFI + 
C, ペースト は XFI+V だ。 これ は Macintosh と一 
緒。 ロード は XFI+L, 終了 は XFI+Q だ。 範囲 指 
定 して 別の 文字 を 入力す ると （多少 もた つくけ 
ど)， 新しい 文字に 置き 換わる の だ。 党え てい' な 
い 機能 ゃキ一 バイ ン ド されて いない 機能 はファ 
ン クシ ヨン キーで プルダウン メニューが 開く の 
だ。 ファンクションキーが 逸くて いやなら， ど 
つかの キーに バイン ド してお けばい い。 

文 害の 管理 も， アイデア プロセッサの 機能 を 
使えば， 複数の もの を ひとまとめに 管理で きる 
ので， たとえば パソコン通信で もらった メール 
の 管理なん かも 簡単。 

マルチ ウィンドウ も 便利。 いろんな 文章 を 横 
目で 見ながら 鲁け るから， 上下 2 分割 程度と は 
雲泥の差 だ。 

しかも， どこで 悪い こと をして いるの 力、， 全 
角キ一 を OFF に すれば， 自動的に 英数字 入力 モ 
—ド になる ので， 遠くの ローマ字 キーまで 指 を 
伸ばさなくて 済む。 

という わけで， 私 は Hyperword を 使って いる。 
変換 時の キ一 反応 を 速く しろ ！ とか， 削除/挿 
入が 遅す ぎる ぞ ！ という 文句 はとても あるの 
だが， とりあえず， 付属 ワープロより は 使いで 
が あるの だ。 私と して は 印字機 能 を 別 プロ グラ 
ム にして， 縦書き と 力、 2 段 組み を サポート したち 
やん とした やつに して （本体に は テスト 印字 程 
度の 簡単な ものし か 与えない）， プログラム を 小 
さ く しても らいたい。 

速度 も， もっと 速くで きる 気がする。 さらに， 
テキス ト ファイルの 読み 鲁 きを もっと 速く して， 
カーソルの 現在 位置が わかる ようにして， つい 
でに ヘルプ 機能 もっけて ほしい。 シート ごとに 
書式 も 変えたい。 害 式 設定 画面 も 使いに くい。 

し 力、 し， 私 は Hyperword を 使う。 PC- 9801 で會く 
とき は （たとえば シ ムシ ティーの 原稿 を 書く と 
き は X68000 が 街 作り で 忙し かつ たので PC-980I 
を 使った）， VZ エディ タを 使う。 だから 速い 瑰境 
も 知ってい るの だ。 それでも， 速さが すべてで 
はない c 私の 目に Hyperword の マルチ ウイ ン ドウ 
は 優しい。 


図 1 


HPW . KEY Der ini tion file for power key. This file define some of 

WordStar compat i bLe operations . See "3.9.2 Power key operation" of 
HyperWord manua i for the def ini t i on of power key ( and see "appendix 
List of operation for the code of each operation - 


{EditKey 


ni tion for edi tt ing key 
move cursor up 
move cursor down 
move cursor left 
move cursor right 
roll up 
roll down 
back space ( BS ) 
delete character ( C 
change store mode 
of character ( INS ) 
tabulation ( TAB ) 
carriage return ( CR 


XFI キーと なって いるが、 
CTRL と統み 替えて くださ 


ォブ 


付 起動 をす るた め、 

荻 窪 


特集 I 我慢せ ずに 使う WP.X 55 


特集 1 


日本語 を 処理す るた めの 序章 廳 1 号 はどうなる のか？ 



木 メォス 夕 シスへの 道 


Iwai Ippei 

祝 一平 


XlturboZ で 電脳 倶楽部の 原稿 を 害 く 祝一 平氏 も， なんと かな ら 
ない もの かと 思い 始めた 今日 この頃。 求むべき は， サ クサ クと， 
た だ ひた す ら 頭の 中に 浮かんだ 文章 を 入力 できる バラン ス 状態 
である。 力、 く して 雷 語 1 号 はなが 一い 発進 準慊に 入った。 



コンピュータの お 仕事が 「計算」 か ら 「情 
報 処理 j になり， そのな かで 日本語 ヮー プ 
口 が: t 要な 機能 と なって， はや 四 半世紀で 
Wh (かど :3 か はよ く 知らないが， まあ そ 
んな もんた' あう）。 そ 一 ゆ 一わけで あるか 

ら， X68000 が 発売 開始に なった ときに， そ 
れ まで XI turbo で 即戦力 を 愛用 し て いた 私 
は， X68000: 用に 使え そ う な ワープロが 出た 
ならば, たちまち 乗り換える つも りで いた 

んが， ああ それな のに 幾 星霜。 ふと 気づ 

けばなん という ことであろう， も う 3 き以 
上 もた つと ゆ 一のに， あ いもかわらず 文章 
を 書く ときには， よつ こらせと XlturboZ 
で 即戦力 を 立ち上げ ている 私で わぬ わい く 
わ つ ！ 

まあ， 誤解の ないように 言って おく 力 5 , 
X68000 用の ワープロが 全部 ダメ という わ 
けで はなく， 私に とって 即戦力よりも 使い 
易い と 実感で き る ものがない という こ とで 
ある。 こ ないだ まで は Hyperword に 若干の 
期待が あった わけで ある 力 ; ， 残念ながら 速 
度の 点で 見送りで ある。 速ければ よいと い 
う わけで はない 力;， 思考の リ ズムが 狂わな 
い 程度に 速く なく て は 困る の だ。 

てな とこで， 思う に， ほかに なんか 出る 
としても， あとで 述べる 諸々 の 事情に より， 
私の 要求 を 満たす も のが 出て きそう な 気配 
は 今のところ はない ような ので ある。 う 一 
ん， 困った。 

n 

そこで， あの 頃に 帰って みょう 力' と 思う。 
r な いのなら， 自分で 作れば いいの さ」 と， 
な んの 疑問 も 持たずに 信じて いた あの 頃に 
である。 

日本に パソコンが 出現して 10 年ぐ らいた 

つたよう だけど， その 間に は蒈及 台数の 飛 
躍 的な 伸び もあった し， それに ともなって 
ソ フ 卜 ウェアの 技術 レベル も どんどん 上 力 5 
つてい つて， そしてい つし 力 '「自分で 作る」 
という こと 力 f ， ものすごく， マニアックな 
ことにな つてし まった。 
でも， 今 だって 「ない のなら 作って しま 


えば いいの さ」 という 事実に， 変わり はな 
いはず だろう （そ り やそ 一 だ)。 

で， 考えよう によつ ちゃ， X68000 のソフ 
ト を 作る ための 環境 は ものすごく 整って い 
る。 DOS は 標準で ィ寸 いてく るう. えに， バー 
ジョ ン アップ なんかで 別売の もの を 購入す 
るに しても 10， 000 円 を 切る 値段で 出て く る 
し （これって 冷静に 考えて みり や， トンで 
もない ことなん だぜ) , 辞書 は 標準で 付 !■ 、 て 
いるから それ を 使うよう に すれば いいし 
(そういえば， 昔， 辞書 を ほかの ソフト か 
ら パク ッて 大騒ぎに なった ワープロが あつ 
たつ け）， XC の ver.2.0 も そろそろ リ リース 
される であろうし。 

そして 木メ ォスタ シス 

実 をい うと， 私 は 密かに 「帝国主義の 最 
終 形態 は ソ 連 型 共産主義で あり， 独占 资本 
の 最終 形態 は ソ連 型 共産党で ある」 という 
理論 を 持って いたのであった。 もしも この 
理論 を 一昨年ぐ らいに 発表して おけば， 今 
頃 は おニャン子 政治学 者の 舛添 先生と いつ 
しょに マスコ ミでゥ ハウハし てた かも しん 
ない。 おしい こと をした な あ （後知恵 度： 
60%) o 

まあ， とにかく， やっぱり 独裁と か 独占 
とか ゆ 一 こと は， あんまり よくない ことな 
ので ある。 そ 一 ゆ 一意 味から も， そろそろ 
X68000 にな かな かの ワープロが 出て き て 
ほしい 頃で はない 力'。 やつ ぱ， ものごとつ 
—もん は， 多様性に こそ 真の 安定と 発展が 
あ る の だの だ。 

そこで， 「謎の 日本語ワープロ」 の 暫定 仕 
様 を 発表す る わけで ある 力 f , ただし， あく 
まで さわり だけで ある。 なぜかと いうと， 
もしも 全貌 を 公表 してし まった のなら ば， 
ヅャヌ 卜 某と かいう 会社の 社長が 反復 横 跳 
び をして しまう ほどす ごいから である。 ま 
あ， それぐ らい 画期的な ワープロになる 予 
定 なので ある （ハツ タリ 度： 測定 不能）。 
® 

まず は ソフト 名で ある 力 5 ， 前々 から ホラ 


つてお い た ように 「雷 語 （サンダー ヮ 一 ド） 
1 号」 である。 ど ど ど ど ど。 

この ソフトの 基本 は， あくまでも 「質実 
剛健」 にある。 蛏快さ を 失わず， かとい つ 
て 必要な 機能 は 決して おろそかに しないの 
である。 多 機能で はな く 高機能な ので ある。 
プロテクト はか かってな いし， 増設 メモリ 
なしで も 動く 予定 だぞ。 どう だまい つ た か。 

うりう り C 

さっそく 起動 方法で ある 力 $ , 当然ながら， 

最初に Human が 立ち上がるな。 んで， 
AUTOEXEC. BAT が 環境 変数 なんか を設 
定 した あとで， 自動的に ヮ 一プロに 入って 
もい いの だ 力 f , べつに そ 一 ゆ 一 ふうな 起動 
に は 限って ないから， なんか ほかの こと を 
やった あとで， あたかも ED.X を 起動す る 
よ う に， 

TW1 ファイル 名 [CR] 
でよ いので ある。 

さて， 肝心の 諸 機能で ある 力 ? ， まず この 
際 ハツ キリ してお きたいの 力 f ， 

マルチ ウィンドウ 機能なん かね ーぞ 

という ことで ある。 

実に 嘆かわし いこと である 力、 最近 は 発 
売 日の 何 力 月 も 前から ドカ ドカ と 広告 を 打 
つと いう ことが 常習と なって いる。 その 結 
果 として， 多くの ソフト は カタログ スぺッ 
クの 充実ば か り に 走つ ている ので はな いだ 
ろうか？ その 結果 マルチ ウィンドウ とか 
の 飛び道具に 走る 傾向が 絶えない。 困った 
ものである。 ソフト ゥヱァ の 真実 は ハッタ 
リ にあらず， 便利に あり。 質実剛健 こそ 永 
遠の 王道な ので ある。 そこで 改めて 問い K 
したい。 

エディタで オーバーラップ する ウイ ン ド 
ゥが 沢山あった として， いったい 何が 面白 
いんだ？ 

アイデア プロセッサなん ていった つて， 
結局 は 害き 手の 脳 ミソの レベル 以上の 文章 

がで きる わ けがな い じ や な いか。 

そり や あ， でかい ハードディスク を 稍ん 
だバキ バキの 32 ビッ トの ワーク ステ ーショ 


56 Oh! X 1990.9. 


調達され て， その 行で [変 
換], [次 候補], [次 候 
補], [確定] とか を やる 
わけた' な。 

で， 一見 当然に 思える 
こ の や り 方が， おつ と ろ 
し く 古い 基本 設計の マシ 
ン にと ら われた， ジャ ッ 
プな 方式で あ る こと にお 
気づきであろう 力'。 そ う， 

このような 形 式 の FEP 
は， ァ メック スの ダイ レ 
ク ト メールの 中に 入って ;';•；>.• 
いる 切手と ボールペンの に '•' 
ように セセ コマし いの だ。 あんな もの は， 
結局 は キャラクタ 用の 画而を 1 面し か 持つ 
てな かつ た 時代の 盲腸 なので ある。 

その 点 X68000 は 立派な ビ ット マツ プ画 
面 を 持って いる （しか {> 4 プレーン）。 そこ 
で だな， FEP は そのうちの 2 プレーン を 使 
用す るの だ。 はっきり 言って しまえば， マ 
ウスの 右 ボタン を 押す と 出て く る 例の 「仮 
想 キー ボー ド」 と 同じ ノリで 「変換 ィ乍業 場」 
が 出現す るので ある。 で， 実は その FEP は 
常に WARM な 状態で 待機 している から， 

[CTRL] - [XF1] が 押されたならば， 電 
光石 火で 呼ばれて 飛び出て ジャ ジャ ジャジ 
ヤーンな ので ある。 当然， 設定に よって 変 
換行は 何 行で もい いわ けだな。 よ つ て 最大 
の 32 行 モードに して， パレット を 不可視に 
して （この場合 マウス 力一 ソル も 見えな く 
なる けど） おけば， たち ま ち， 



数えなければ いけない のと 同じ く らい 確か 
なの だ。 な ん と 使用者 友好的で あ る ことよ。 
ど だ ？ ど だ ？ 

当然ながら， 雷 語の 最初の もの は X68000 
で 発表され る わけで ある 力 f , 特に 温情 を垂 
れて， 雷 語 ダッシュ と かゆ 一 やつ を 他 機種 
に 移植して やって もよ い と 思って いる 力;， 
挨拶 に 来る 際 に は 山吹色の モナ 力 を 忘れぬ 
よ 一に。 

な お， 雷 語 1 号 はあくまで 巨大 な 地殻 変 
動の 前兆に すぎない ので ある。 すなわち， 
やがて は 雷 語 2 号が 出現し， さらに は 3 号 
(女性用で 「ァ マゾ' ン」） と 発展して いき， 
4 号， 5 号， 青の 6 号 （ふ， 古い）， , 
28 号で 音声 認識に よる コントロール となる 
予定で ある。 文句 ある 力'。 

入手 方法に ついて 


ンで， OS に 仮想記憶 と か が あ るなら ば， 
それぐ らいの も のがあって もい いけど さ。 

とにかく， オーバ一 ラップ 処理 はかなり 
重い 処理な の だ。 そこで， 質実剛健な 雷 語 
1 号と して は， 変に 重い ミエ 機能 は 排除し， 
とりあえ ず 水平 画面 分割 だけ を サボ 一 ト す 
るので ある。 これ はま あ， 簡単に 表現 すれ 
ば， 画面 を 上下に 2 分割し， 2 つの フ アイ 
ル （もしくは 1 つの フ アイ ルの 別々 の 部分） 
を 同時に 表示し， 編集 するとい う ものにす 
ぎ ない。 ただ し 2 分割 だけで は ちょっと 不 
便な ので， そうだな， 最高で 8 分割ぐ らい 
まで はでき るよう にして おこう ■： 1 フ アイ 
ル 4 行 だな （行数の 増減 可)。 本当 は 32 分割 
や， 1/4 角 文字 を 使っての 64 分割 ぐ らいまで 
やって みても よいの だ 力 ? ， やっぱり 何かと 
不便だろう からこれ でい いの だ。 うむう む。 

それから である 力 5 ， 現在 は 多くの ワープ 
口に 普通に 備わって いる 機能の よ うで ある 
が， 印刷 イメージの 画面 表示 も 欠かせない 
な。 印刷す る 間 待た された うえ， 紙の 無駄 
ま でで き ると いうの は， 果て し な く プン ス 
力 だからな。 

そ いで， やっぱり コ マン ド 体系 は Micro 
Emacs 系 だな。 基本的に は [CTRL]- [〜] 
と， [ESC]+ [-] で 勝負す るので ある。 
で， ま か り 間違っても キー ボー ド に テン プ 
レー ト を かぶせた くなる ような ゥ 二な コマ 
ン ド 体系 にだけ は し た くないと 思 う ので あ 

る o 

だいたい 今の 日本の ワープロ/エディ タ 
は な ん な ん だ。 E macs の 設計 思想 を 多少 な 
りと も 理解して いるの な ら ば， あんな わけ 
の わからない コ マン ド 体系が で きる わ けが 
ない と 思う の だ 力 ? 。 責任者 出て こい。 前に 
も 書いた こ とが ある カミ 「ファンクション キ 
—は 押 しづら い」 という 当たり前 のこと を， 
いったい いつにな つたら 理解して くれる の 
だろ う か。 

ほかに もい く ら でも ボャく ネタは ある 力 f ， 
とにかく キレの 違う コマ ン ド 体系で 勝負 し 
たいと 思って いるので ある。 そう， 雷 語 1 
号 は， パンチの 効いた ナウい 日本語 ワープ 
口 なので ある。 

： FEP も一 瞻 ぅぞ 

FEP である 力 ? ， やっぱり ASK68K を その 
まま 使う というの も芸 がない。 そこで 雷 語 
1 号の FEP は 「雷 太」 である （香港 製で 
「ドラゴン」 なんて 名前の マシンが あった 
ら ぜひ 移植して みたい な）。 

普通の FEP の 基本 動作 といえ ば， 変換 モ 
ードに 入る と 画面の 一番 下の 行が 変換 用に 


スクリーン;!: デ イタが 出現す る 

ではない かつ ！ 

タネ を 明かせば， 所詮 画面 切り替え にす 
ぎ ない ので ある 力 5 , 使用 感は マルチ ジョ ブ 
である。 もちろ ん 機能な ど に 多少の 制限が 
付 く 予定で あ るが （メモリの 占有！: と かが 
あるから ね）， 基礎的な 部分， た と え ば 編集 
機能の ほとんど， ロード， セーブ， 結合， 
印刷な どはス パス パと できて しま うので あ 
る （もちろん， リッチに 数 メガ を 増設 すれ 
ば， しっかり と 雷 語が 100% 動作す る 予定で 
ある）。 こ れで， ちょっとし た 文章な らヒョ 
ヒョヒ ョィの ン パンパ とでき てし ま う の だ 
(おっと， 書いて てァ ルゴ エディタ を 思い 
出した ぜ）。 こんな こと も， CONFIG.SYS 
で， 

DEVICE = 3DERBOY. SYS #L32 
と 登録して おく だけで で きて しまう の だつ 。 
う〜 ん， なんて 便利 な ん だ ろ う 。 X68000 で 
あれば， これぐ らいの ものが できて しまう 
という こと は， 踏み台 昇降の 後で は 脈拍 を 


さて， この 雷 語 1 号の 配布 方法で あるが， 
「フリーウェア にして， サポート は 気が 向 
いたらね」 というのと， 「ホン 卜に 売つ ちゃ 
う。 ちゃんと サポート や バージョンアップ 
もす 一る する」 という 2 つの 手が ある わけ 
だが， どっちに する か は， まあ， 出来具合 
を 見てから 決めよ う。 本当の こ と を 言う と， 
どこかの ソフト ハウスが ちゃんと したやつ 
を さっさと 作って くれる （移植で もい いん 
だけど） のが 一番 あ りが たいんだ けどね え。 
そ れな り の レベルの も のがで き れば， かな 
り 売れる はずなん だけど。 ぶつぶつ。 

^後に 念のため 言って おく。 こんな こと 
を 書いた からといって 「まだで きとらん の 
か！ さっさと 出せ！」 などと 言って せか 
さない よ一 に。 そ一 ゆ 一 奴に は NHK の 集 
金 人 を 差し向けて やる からな。 聞く ところ 
によると， あれ は 歩合制 だ そ う だか ら ， う 
かう かしてる と 尻 小 玉 を 抜かれる ぜ。 

ちなみに， 雷 語 1 号の 開発の 合 言' 葉 は 
「BTRON に 続け ！ 」 である （笑）。 
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特集 1 


日本語 を 処理す るた めの 序章 ASK68K 用 辞書 メンテナンス ツール 《前編》 



辞書 整備 基本 編 


村 田 



i 

こ こ ^^Plp^ 麟 辞書 を 整理す る ツー 

ル が あ:: る 。 な ぜか ある。 とにかく ある。 辞 
一^^ キス ト ファイルに 落 

# す ^n^0int 始まり， 単語の 一 ig ファ 

ィル から^ a に 辞書 を 作成す る もの， 辞書 
と めて 削 る も の， 辞書に 単語 

を^' めて 追加す る もの， ほかの 日本語 フ 

工' |^ ド プロ セ クサ 用の 辞書 を ASK 
l|j にコン '(一 卜する 「助け をす る もの， 辞 
,!•;•— が 壊れ ていない かどう か 検査 して ある 程 
度 修復す る もの， これらに 加えて-大小の 補 
助 ツールが 何 本 力 。 ASK の 辞 化: に M し 

て は 必要 以上の こ と がで き ると いっても 過 
言で は ない ほ どの 充実 した ライン アツ プだ 
(うん うん）。 

特集に かこつけて， 今月と 来月の 2 回で 
これらの ツール （全部 は 無理 だが） を 読者 
にお 裾分け しょうと 思う。 つまらな いもの 
です 力 5 , よろしけ れば ど う ぞ， つてな もん 
だ。 

で も 変なん だよ な。 どうして こん な ッ 一 
ルを 作つ たんだろう？ しかも， こんなに 
充実させる ほど ムキ になって。 自分で 作つ 
てお き な が ら， 作成し た 動機が どうも はつ 
き り しない。 

作った の はもう かなり 前で， タイム スタ 
ンプを 見る と 去年の 9 M に 最終的な 修整 を 
加えた ことにな つてい る。 ますます 変 だ。 
当時の 僕が こんな プログラム を 必要と する 
はずがない。 

そり や あ， ASK の 辞書 はデ 力い。 郵便 番 
号 辞書 やら 不要な 固有名詞 や ら を 削って， 
すっきり させたい と 思っても なんの 不思議 
もない。 < 

そり や あ， ASK の 辞書 はデ 力い わ り に は 
登録 語が 貧弱で JIS 第 2 水準の 熟語なん か 
全滅に 近い。 よその 日本語 フロントエンド 
プロセッサの 辞書から 単語 を 吸い 上 げてノ 、° 
ヮーァ ッ プ できた ら な 一 と 夢見た としても 
パチは あたる ま い。 

そり や あ， DICM.X は 使いに く い。 誤 変 
換 によって 積もり 積もった サ ブ辞 書中 の ゴ 
ミ （単漢字な ど） を 削ろうと 思い立つ たと 


Toshivuki 

敏幸 


日本語 入力の 効率 を 上げる に は 辞書 を 鍛える ことが いちばんで 

す。 今月 と 来月に わたって ASK68K の 辞書 を 整理す るた めの ッ 
ール をお 届けし ます。 日本語 環境の 整備 も 自分の 手で 行う 二と 
がで きる のです。 


しょ う 力'。 DICM を 立ち上げ， メニューから 
単語 削除 を 選び， 問 われる ま ま に 辞書 ファ 
ィル名 を 入力す る。 と， ここで 金縛りに あ 
つてし まう。 読み を 入力し なければ 単語が 
削れない！ あらかじめ， 削りたい 単語 を 
紙に 書き出す 力'， プリ ンタに 打ち出し てお 
く かしなければ， どの 単語 を 削ったら よい 
かが わか らな いと は。 仮に 削 り たい 単語 を 
リストアップで きたと しても， メモ を 見な 
がら 読み を 打ち込んで リターン， カーソル 
キーで 単語 を 選んで リターン， よろしいで 
すかの 問い かけに Y と 答え， 終わります か 
の 問いに N と 答え， 読み 入力， 単語 選択， 
Y, N, 読み 入力， 単語 選択， Y, N …… 
あっとい うまに 嫌になる。 そもそも， 単語 
1 個 削る たびに "終わります か？" つて 聞 
いて く るの はなん のつ も り だ？ 

どれ も 立派な 動機 だ と 思った かもしれ な 
い。 確かに ASK を 頻繁に 使う 人に とって は 
そうだろう。 ところ 力 5 , 僕 は 2 年 前から 恥 
ず かしながら 新 松の 入で ね （ある 日 を 境に 
突然 WP. X に 耐え ら れな くな り， 某国 民 機 
を 買いに 秋 葉 原へ 走った）。 ちょ う ど， 去年 
の 秋なん ていったら WP.X はおろ か ASK 
を 使う 機会 も ほとんどなかった はずな の だ。 
なのに どうして， これ だけの 数の プロ グラ 
ムを 作つ たんだろう。 謎 だ。 

ま ， 最近 は X68000 上で 原稿 以外の ちょつ 
と し た 文書 （作つ た プログラム の 仕様書 と 
いうか 覚え書きみたい なのと 力'， いろいろ。 
あとで 役に立つ こと は 滅多にない 力' り なん 
か に ASK68K を 使う こと も 多くな つてき 
たから （WP.X だけ はどうしても 駄 0。 絶 
対に 駄目）， いまごろ になって， 辞誉を 整理 
する プログラム を 作って おいてよ かつ た 一 
と 思って いたりす る。 備え あれば 薆 いなし 
と はよ くいった も の だ。 

プログラムの 内容 


今月 は 基本 セ ッ 卜 を 提供す る 。 辞書 内容 
を テキス ト ファイルに 落とす 「DUMP 
DIC. Xj, 逆に 単語の 一覧 ファイルから 辞 


書フ アイ ルを 作成す る 「GENDIC. Xj, 単語 
一覧 ファイル を 食わせる と その ファイル 屮 
の 単語 を 辞書から ごつ そ り 削除す る 
「DELWORD. X」 の 3 本 だ。 
あらかじめ 断って おく 力 5 ， これらの ツー 
ルは 扱いに く く 得体の しれない バイ ナ リ フ 
アイ ル である 辞書 を 扱い やすい テキス ト フ 
アイ ルに 変換し， この テキストファイルの 
レベルで 手 を 加 え た う えで 一括 して 辞書に 

戻す， という 基本 方針で 作られて いる。 い 
つたん テキストに 落として しまえば， ェデ 
ィ タで 編集す る こと もで き れば， フィルタ 
にかけ る こと もで き る わけ だ。 

各プ ログ ラム は いわゆる DOS コマンド 
つぼい 体裁で あ り， COMMAND. X 上で 使 
うこと を 想定して いる。 使用に あたって は， 
コマンド モードでの 操作に 習熟し， リ ダイ 
レク トゃ パイプの 利用 方法 を 理解して いる 
こ とが 望ま しい。 

ま た， ASK の 辞書 を 自分な り に 解析 し た 
結果 と 勘に 基づいて 作成 し た プロ ダラ ムで 
あり （内心で は ある 程度の 自信 を 持って い 
る とはいえ）， 残念ながら 100% の 動作 保証 
をす る 勇気 はない。 ペーパー メディアで 提 
供す る 以上， プログラム 入力 時に 打ち込み 
間違いが 生 じる こと も 考えられ るし， 万が 
一に 備え， プログラム を 走らせる 前に は 辞 
書の バックアップ を 取って おく こ と をす す 
める。 

あと， 打ち込んだ プログラム は 読者の も 
の だ。 改造しょう 力 f ， ほかの プログラムに 
組み込もう 力 f ， 友達に あげよう 力、 好きに 
して かまわない。 この 程度の プログラムで 
コピー ライ 卜 を 強硬に 主張す る ほ ど 酔狂で 
はない。 ただし， ASK の 辞書， X68K—M. 
DIC, X68K_S. DIC は 開発 元の アクセス/ シ 
ヤー プの 著 作物で あり， ツール を 使って 加 
ェ したと しても その 事実に 変わ り はない。 
十分な 配 威 を もって 取り扱って ほしい。 

では 各 プログラム を 紹介し よ う。 

參 DUMPDICX 

使用法： DUMPDIC [スィッチ] 辞 害 フ 
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アイ ル名 ["開始 位置" ["終了 位置"]] [/0 

出力 ファイル 名] 
本 ツール 群の 前提 と な る プロ グラ ム であ 

り， なに は ともあれ， まず 必要。 この プロ 

ダラ ム がな ければ GENDIC. X や DELWOR- 
D. X も 意味 をな さない。 ただし， 多少の 制 
約つ きで DICM. X に DUMPDIC. X の 代わ り 
を 務めさせる ことができる。 具体的な 手順 
は コラムに ま とめて おいた。 
DUMPDIC の もっとも 単純な 使い方 は， 
DUMPDIC X68K 一 S.DIC 
のように， 辞書 ファイル 名 だけ を 指定した 
形式 だ （拡張 子の ".DIC" はっけて もっけ 
なくても よい）。 この場合に は， 辞書の 全 内 
容が 画面 （標準出力） に 書き出される。 こ 
れを， 

DUMPDIC X68K— S >file 
のように リ ダイ レクトす るか， 

DUMPDIC X68K 一 S /Ofile 
と， /0 スィッチに 続けて 出 力 ファイル 名 を 
指定 すれば 単語の 一覧 を ファイルに 落とす 
こ と がで き る。 以下， こうやって 作成した 
ファイル のこ と を 単語 フ アイ ノレと 呼ぶ こ と 
にす る。 

サブ 辞書 は ともかく， メイン 辞書の 内容 
を 書き出す と 1M パイ トを 優に 越える 単語 
ファイルが 作成され る。 そこで， 非 ハード 
ディスク ユーザーの 場合 は， ' '読み" の 範囲 
を 区切って 2 度 以上に 分割して 出力す る必 


要が 生じる。 読みの 範囲 は， た と えば 次の 
よ う に 指定す る。 

DUMPDIC X68K— S "あ" "こんん ん" 
Milel 

この 例で は 読みが "あ" 〜"こ'' で 始ま る 
単語が f ilel に 出力され る。 なお， ここで は 
全角 ひら が なで 読み を 指定して いる 力 5 , 
DUMPDIC は 全角 カタ カナ， 半角 カタ カナ 
での 指定 も 受け付ける。 また， 

DUMPDIC X68K— S "さ" >file2 
のように， 終了 位置 は 省略しても よい。 そ 
の 場合 は 辞書の 最後までと みなされる。 
始 位置 を 省略し， 終了 位置 だけ を 指定す る 
こ と はでき ない 力 f , 開始 位置に 空 文字列 を 
す旨定 して， 

DUMPDIC X68K_S "" "こんん ん" 
と や れば同 じ 効果が 得 られ る。 

ス イツ チで 指定す る こ と で 特定の 品詞 だ 
け を 抽出す る こと もで きる。 

/A 形容詞と 形容動詞 

/D SiJlB) 

/N 固有名詞 以外の 名詞 

/P 固有名詞 

/T 単漢字 

/V 動詞 
当然， スィッチ は 複数 指定しても よく， 

DUMPDIC /N /P X68K_S 
なら， 辞書 中の すべての 名詞が 出力され る。 
ま た， 


DUMPDIC /E /N /P X68K_S 
のよう に/ E ス イッチと 併用す る と ， "指定 
の 品詞 以外" が 対象になる。 この 例で は 名 
詞 以外の 全 単語 を,' I', 力 している。 

さ ら に，/ M スィ ツチ を 指定す る と メニュ 
一から 品詞 を 選ぶ モードに 入る。 この 方法 
を 使えば "か 行 5 段 活用 動詞の み" といつ 
た 細か な 指定 も できるようになる。 メニュ 
一の 操作 は， 

スペース ： 選択 . 非 選択の 切り替え 

リターン： 確定， 実行 

ESC ： 中断 
に よって 行う。 DICM. X の ように リ ダイ レ 
ク ト し たか ら といって メニューが 表示 さ れ 
な く なる よ うな 間の 抜けた こ と はない。 

あと， おまけ fl 勺な スィッチが いくつか あ 
る。/ C スィッチ をつ ける と 単語 を 一覧表 示 
す る ft わ り に 該当 単語の 個数の み を 表示す 
るよう になる。/ H,/G，/K の ft スィ ツチ を 
指定す る と "読み" を それぞれ， 

/H 半角 カタ カナ 

/G 全角 ひらがな 

/K 全角 カタ カナ 
で 出 力す るよう になる 。/H, /G, /K のい ず 
れ も 指定 されな い 場合 は/ K とみな さ れ 
る。/ H を 指定 すれば， 作成され る 単語 ファ 
ィ ルの火 き さ を 若 千 小さ くす る こと がで き 
る 力 5 , そ の 代わ り エディ タ な どでの 編集 は 
面倒 になる こと が 予想 される。 


DICM. X を DUMPDIC. X の 代わりに 使う 方法 


リス トを 入力す る 手間 を 惜しむ 読者の ために， 

D に M.X で 単語 ファイル を 作成す る 方法 を 1 つ 
紹介して おく。 それぞれ 一長一短が あるから， 
う ま く 使い分ける とよい かも しれない。 
その I ： リダイレクト を 利用す る 

安直な 分，" メニュー もり ダイレク ト 先にい つ 
てし ま うので 画面に なにも 表示され なく なる'' 
という 大き な 欠点が ある （DICM が 悪い）。 具体的 
な 手順 は 以下のと おり。 

1) まず， ふつうに DICM を 起動し 単語の一 覽 表 
示 をして dk;m を 終了す る ま での一 連の キ一 操 
作 を » えて （メモして） おく。 

例） 下向き カーソル キー を 2 回 押して， リタ 
—ン キー を I 回 押して， それから〜。 

2) いったん DK;M を 終了し， 
A > DICM >B:WORDFILE 

のように， 標準出力 を 適当な ファイルに リ ダイ 
レク ト して 再起動す る。 画面に はなに も 表示 さ 
れな いが 51 にしない。 

3) I) で 覚えた とおりに，" 単語 一覧 メニュー を 
選び 一覧 を 開始す るまで" のキ一 操作 を 正確に 
再現す る。 途中で 間違えたら， "インタラプト ス 
イッチ を 押す'' ， "プリンタ を オフライン 状態に 
して COPY キ 一を 押す" などの 方法で DK)M を 強 
制 終了 し 最初から やり直す のが 手っ取り早い。 

4) ディスクが 止まる の を 待って，" 単語一 覽メ 
ニュー を 抜け， DICM を 終了す るまで'' のキ 一操 
作 を 再現す る。 


5) 無事， COMMAND. X の プロンプトが 出たら 
出力 ファイル （上の 例で は WORDFI し E) を エディ 
タで 読み込み， 最初と 最後に ついた ゴミを 削つ 
て セーブし 直せば 完成。 
その 2 ： 空の 辞 寄との 辞 害 差分 を 利用す る 

あまり 使わな L 、機能 な の で 気づか な かった の 
だが， DICM の辞畲 差分 メニュー では 出力 先に フ 
アイ ルを 指定す る ことができる。 "X — o = x" 

だから， 空の 辞 害との 差分 をと る ことで 単語の 
一 S ファイルが 得られる。 出力 範囲 を 指定す る 
ことができな いのが 難 》 

1) 単語が なにも 登録され ていない 空の 辞 害 を 

用意す る。 購入した ときの ま まの X68K— S.DK) がま 
さに それ。 運悪く システム ディスクが 見当たら 
ない よ う な 場合に は， 次の X_BAS に プロ グラム 
で 空の 辞 害 を 作る こと もで きる （要は 8132 バイ 
ト 以上の 00 H だけから なる ファイルが あれば よ 
い)。 

10 dim char dmy(8l9l) 
20 int fp 

30 fp = fopen ( "null, die", "c" ) 
10 f write ( dmy, 8192, fp ) 
50 fclose( fp ) 

2) DICM. X を 起動す る。 

3) メニューから 辞書 差分 を 選び， 辞害フ アイ 
ル として 1) で 用意した 空の 辞 害， 参照 ファイル 
として一 II 表示したい 辞 害 ファイル 名， 出 カフ 
アイ ルと して 適当な ファイル 名 を 指定す る。 


4) よろしいで すかの 問い かけに Y と 答えれば 
処理が 始まる。 

さて， DICM.X を 使って 得られる 単語 ファイル 
は DUMPD に. X の 出力 形式と は 異なる。 が， 
GENDIC. X や DELWORD. X は ど ち らの 形式 も 受け 
付ける から その 点で は 安心して もらって よい。 

ただ， DUMPDIC. X は 各行に 必ず "読み" をつ 
ける のに 対して， DICM. X の 場合 は 同一の 読みが 
続く 場合 は 読みが 省略され る。 これ は， 単語 フ 
ァ ィ ルの 部分 を FIND. X など を 使って 抽出す る 
際な どに 問題になる かもしれ ない。 たとえば， 
ァ ： 阿 /単 漠字 
ィ ： 行 ノカ五 動詞 

位 /単漢字 

という 単語 ファイルから， FIND.X を 使って 単漢 
字 だけ を 選び出す とすると， 

ァ ： 阿 /単漢字 
位 /単漢 宇 

となって しまう。 GEND に. X な どで は， 読みが つ 
いていない 行 は 直前の 行と 同じ 読みと みなす か 
ら， これ は， 

ァ ： 阿 ノ単漠 字 

ァ ： 位 ノ 単漢字 


と 解釈され るので， うまくない 

't、 I o 


. とがわ かる と 
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•GENDIC.X 

使用法： GENDIC [/F 空き 容量] [単語 
ファイル] [/0] 出力 辞書 ファイル 

DUMPDIC な ど で 作成 し た 単語 フ ァ ィ 
ル から 新規に 辞書 フ ァ ィ ルを 生成す る。 

GENDIC WORDFILE USER. DIC 
もしくは， 

GENDIC WORDFILE /OUSER. 
DIC 

のようにして 使う のが 基本 だ。 上の 例で は 
単語 フ アイ ル WORDFILE から 辞書 ファ ィ 
ル USER.DIC を 作成して いる。 /0 スィ ツチ 
は 単に ほかの プログラムとの 対称性 を 保つ 
ために ffl 意され ている だけで， 通 常 は 省略 
できる。 また， 例 によって 拡張 子 ". DIC" 
はっけな くても よ い。 

あまり やらない こと だろ う が, パイ プで 
つ な ぐ よ う な JT1 途 も 想定 し て ， 単語 'フ ァ ィ 
ルの 指定が 省咯さ れた 場合 は 標準入力 か ら 
入力す るよ う にして ある。 この場合 は/ O ス 
イッチ をつ けて， パラメータが 単語 フ アイ 
ル ではな 〈辞 普 ファイル 名で ある こ と を 明 
示す る 必要が あ る 。 

DUMPDIC /N X68K — S I GEN 

DIC /OUSER 

特に 指定され ない 場合， GENDIC は 単語 
を 可能な 限 り 詰め込んで 隙間の ない 辞書 を 
作成す る。 あとから 単語 登録が で きる よう 
に ゆと り を 設けたい 場合 は， スィ ツチ/ F に 
よ り 空き 容量の 割合 （DICM で 辞書 再編成 
をす る 場合と 同様， 単位 は ％) を 決める。 
GENDIC /F20 WORDFILE USER 

空 き 容量 は 0 から 最大 50% ま で 許す よ う 
に して ある。 

GENDIC にん ■■ える 単語 ファイルの フ ォー 
マ ッ ト は DUMPDIC の 出力 形式 と Ml じ で， 
1 行に 1 単語 分， 

読み 登録 語 品詞 名 
の 順序で 並んだ も の だ。 &フ ィール ド は 半 
角 スペース または タブで 区切る。 読み は 全 
角' 申 角の いずれで も 構わない 力 *, 必ず 行 
頭から （空白 を 入れずに） 書き 始めな けれ 
ばな ら ない。 行頭が 空白の 場合 は 直前の 行 
の 読み を 引き継ぐ。 要するに， 
ァ 阿 単漢字 

亜 単漢字 
啞 単漢字 

は， 


ァ 

阿 

1 れ^ 字 

ァ 

亜 

•> 

： 二 

ァ 

啞 

単漢字 


とみな される。 
また， 一応, 
ァ ： 阿 /単漢字 

のよう な DICM.X の 単語 ー黧の 出力 形式 
も 受け付け るよ う に 作って ある。 

と き に GENDIC は 単語 フ ァ ィ ル の行番 
号と とも に 以下の よ う な 警告 メ ッ セージ を 
出す 場合が ある。 
• 無効 行が あ り ま し た 

単語 ファイルの 形式が 正し 〈ない。 3 つ 
のフィ 一ル ドが 揃ってい ない と 思われる。 
- 無効な 品詞 名 [xx] が ありました 

言葉 どおり。 DUMPDIC で サブ 辞書の 全 
内容 を 出力 し， GENDIC に 与えた ときに も 
こ の 替告が 出 る 場合が あ る 。 こ れは DUMP- 
DIC と GENDIC の 仕様であって， 害 は な いか 
ら 無視 し て 構わ ない。 ASK は 一部の 動詞 を 
内部で 特別 极 いして おり， 辞書 学習 により 
これが サブ 辞^に にじみ 出て くる ことがあ 
る。 この 部分 は 標準の 辞書 フォーマット か 
ら若千 はずれた 形式に なって おり， GEN- 
DIC はこれ に 対応 していない （必要 も な 
い）。 そこで， DUMPDIC は これら 特殊な 単 
語の 品詞に をつ けて 出力す る ことに 
よって， 故意に GENDIC の 処理から はずす 
ように して あるの だ。 

'読み [xx] に 対応す る 単語が 1 ベー ジ 
に 収ま り ませんで した 

ASK の 辞書 は 1024 バイ 卜の ページに 分割 
されて いて， 同一の 読みの 単語が 複数 ぺー 
ジに また 力 ？ る こと を 許して いない。 GENDIC 
は 1 ページに 収まる 範囲の み を 出力し， 残 
り は 切り捨てる。 

'読み [xx] に 対応す る 単語 力 f 100 個 を 越 

えました 

理由 はわから ないし， そもそも 理由なん 
てない のだろう 力 5 ', ASK に は" ひとつの 読 
みに 対する 登録 語 は 100 個 まで'' という 変 な 
制約が あり， それ を 越える 単語 は 辞書 中に 
存在しても か な 漢字変換 時に 参照 されない。 
GENDIC は ASK の 将来 的な バー ジョン ァ 
ップに 期待して， 一応 100 個 を 越える 単語 も 
辞書に 登録す る。 と ころで， X68K_M. DIC 
中， 読み 「こう」 に は 103 語が 登錄 されて い 
る。 困った も の だ。 
• 二重 登録が あ りました 

言葉 どおり。 GENDIC は 単に これ を 無視 
する。 

• 単語の 並び 順が 正 しくありません 

こ れ は GENDIC の 自慢で きない 仕様た'。 
GENDIC に 食わせる 単語 ファ ィ ルはぁ ら 
かじめ "ASK の 辞書 中に おける 読みの 内部 
コード 順に ソートされ てな ければ な ら な 
い" という ことにな つてい る。 DUMPDIC 


の 出力 を その ま ま 使う 分に は 問題 は 生じな 
い 力' ; ， 単語 ファイル を エディタ な ど でゼ 口 
か ら 作成す る 場合に は 注意が 必要 だ。 来月， 
専用の ソート プログラム を 提供す る 予定で 
い る が, 暫定的な 対処 方法 を 示 してお こう。 
単語の 並び 順の 乱れ を 検出 し た と き， 
GENDIC は 警告 メ ッ セージと 同時に 標準 
出 力 に 登録で きな かつ た 単語 フ アイ ルの該 
当行 を 出力す る （警告メッセージ は 標準 ェ 
ラー 出力に 書き出して いる）。 こ こで， 
GENDIC WORDFILE USER > 
ERR 

のように リダイレクトし' てお く と， "登録 し 
そ こ ねた 単語 だけ か ら な る 単語 フ ァ ィ ル'' 
が 得られる ことになるから， この 単語 ファ 
ィ ルを 使つ て， 

GENDIC ERR USER1 
のように して 別の 辞書 ファ ィ ルを 作り， 
DICM で 併合 すれば よ い。 


•DELWORD.X 

使用法 ： DELWORD [スィッチ] [単語 
ファイル 名] [/0] 辞書 ファイル 名 

単語 フ アイ ルで 指定 し た 単語 を 辞書 フ ァ 
ィル から ま とめて 削除す る。 単語 ファイル 
名が 省略され た 場合 は 標準入力から 入力す 
る あたり は GENDIC と 同様 だ。 /E， /V 2 つ 
の スィッチが ある。/ E が 指定され ると， 単 
語フ アイ ル 中の 無効 行 を エラ 一 ファイル 
DELWORD. ERR に 書き出す。 また，/ V 力 f 
指定され ると 実行 経過 を 表示す る。 このと 
き， 無効 行 は 黄色で， 元々 辞書 中に なかつ 
た 単語 は 青で 標準 ェ ラー 出力に 書き出し， 
削除で きた 単語 は "標準出力" に 出力す る。 
DELWORD /V WORDFILE 

USER >UNDO 
のように リダイレクトし ておけ ば， "削除 し 
た 単語 だけ か ら なる 単語 フ アイ ル'' が 得 ら 
れる。 


參 SPLIT.X 

使用法 ： SPLIT [スィッチ] [入力 フ アイ 
ル名] [[/0] 出力 ディ レクト リ] 

ォ マケ。 辞書 を 整理す る 過程で は 結構 大 
きな ファイル を 扱う ことにな り， 場合によ 
つて は エディタで 読み込めなかったり， ハ 
一 ド ディ スク から フロッ ピー ディ スクに 転 
送で きなかった りする こ と 力 f 考えられる。 
SPLIT は テキス ト ファイル をい 〈つかの 
小さな フ アイ ル に 分割す る 小 ツールた'。 

出 カフ アイ ルは 入力 フ アイ ル 名の 拡張 子 
を ".000"， ".001", "…- というよう に 数字 
で 置き換えた ファイル 名で， 特に 指定 さ 
れ な い 限 り カレント ディレクトリ 上 に 作 
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られ る。 分割す る 大きさ は，/ B 力',/ L ス イツ 
チで 指定す る。 それ ぞ れ 後ろに 数字 を 伴 
い，/ B スィ ツチの 場合 は バイ 卜 単位，/ L ス 
ィ ッ チの 場合 は 行 単位で 分割す る。 どちら 
のスィ ツチ も 指定され ない 場合 は/ L1000 
とみな される。 

； 応用 例 

肇 メイ ン 辞書から 郵便番号 辞書 を 削 る 

1) DUMPDIC で 郵便番号 辞書 を 抜 き 出 
す。 

DUMPDIC /M X68K_M "000""9 
99" >YUBIN 

のようにして DUMPDIC を 起 i 力し， メニュ 
一から 品詞 は "地名" を 選択す る。 

2) 抜 き 出 し た 単 語フ アイ ル YUBIN を 
DELWORD にかけ る。 

DELWORD YUBIN X68K_M 

3) このまま では 辞書 ファイルの 大きさ は 
変わ ら ない ので， DICM で 辞書 を 再編成す 
る。 

• 独立 し た 郵便番号 辞書 を 作る 

1) 上の 1) と 同様の 方法で 郵便番号 辞書の 
単語 ファイル を 作成す る。 

2) これ を GENDIC に 力' ける。 
GENDIC YUBIN YUBIN 

• 多くの 単語 を まとめて メイ ン 辞書に 追加 
登録す る 

1) 登録 し た い 単語 だけ か ら な る 単語 ファ 
ィルを エディタ などで 作成す る。 この ファ 

ィ ルを 仮に WORDFILE とする。 

2) WORDFILE を GENDIC にかけ る。 
GENDIC WORDFILE TEMP 

3) 2) で 作成 し た 辞書 を DICM で メイン 辞 
書と 併合す る。 

入力 • コンパイル 方法 

プロ グラム は ご く わずかな 部分 を 除き， 
C で 記述して ある。 & プログラムに 共通で 
使える 関数が 多く ある ことから， ソース は 
複数に 分割され ており， リンク 時に 結合す 
るよう になって いる。 各 プログラム ごとに 
必要な ファイル を 表 1 に ま とめて おく から， 
それぞれ エディ タで 人力 し， 指定され た と 
おりの ファイル 名で セーブし ておいて も ら 
いたい。 

リスト 中， 左端の 行 番号 は 入力す る 必要 
がない。 また， 全角 文字と 半角 文字の 違い 
は 重要な 意味 を 持つ から， 注意 を 払って ほ 
しい。 

入力が 済んだら コ ン パイルに と り かかる。 
一気に 全部 まとめて コンパイルし， 実行 フ 


アイ ルを 作成す る こと もで きる 力 s , 1 力 所 避ける ために は， 付録 ディスクに 収録され 


ェ ラ 一が 出て 修正す る た びに 全 ファイル を 
コンパイルし 直す の は 合理的で はない ので， 
個別に コンパイルし， そのの ち リンクす る 
と いう 段階 を 踏む のがよ いだろう。 MAKE 
を 利用で き る 環境に あれば べス ト なの だが， 
純 正 品 の MAKE は XC Ver. 2. 0 を 侍 た な 
ければ ならない。 

リ ス ト は 拡張 子に よって， 3 種類に 分類 
され， それぞれ 対) おが 違う。 
• 拡張 子が ". H" の もの 

これ は ヘッダ' ファイルで， コン バイ ノレ 時 
に 自 動的 に 参照 される から， 単に カレン ト 
ディ レクト リ に！！ いてお けばよ い。 
• 拡張 子が ". S" の もの 

VFPRINTF. S だけが これに 該当する。 
アセンブリ ソース だから， 

AS VFPRINT 
によって ァ セン ブル する。 なお， この ソー 
ス 屮 では vfprintf という ANSI C で 定義 さ 
れた関 数の コ ン パチ品 が 定義 さ れて い る 。 
XC Ver. 2. 0 に は 同 関数が 用意され るの は 
間違いな いから， Ver.2.0 が 手に入れば 
すぐに 不要になる はずの も の だ。 ま た， 
VFPRINTF. S r|i に はどうい うわけ か 
printf と fprintf も 再定義され ている。 XC 
Ver. 1 の printf は エラー を 返さ な いという 
古い 仕様な ので， エラ一 を 返す 版 を 用意し 
た。 これ も XC Ver. 2. 0 が 出 る ま での 暫定 
的な 処置 だ。 

• 拡張 子が ". C" の もの 
ほ と ん どが これ。 XC を 使って コ ンパィ ル 

する ときには， 次の よ うにす る。 

CC /L DUMPDIC. C 

こ こ で L は 大文字で な ければ な ら ない。 
CC. X は コンパ ィ ル 過程で で き た 

アセンブリ ソース を 消去 して くれ 
ない の で， 作業 デ イス クの 容量が 
不足 気味で あれば， コンパイル 後 
に， 

DEL DUMPDIC. S 

によって 手 作業で 消 そ う。 

GCC を 利用す ると きに は 多少 
問題が ある。 移植の 版に もよ るの 
だ 力 f , 少なく と も 本誌 6 月 号の 付 
録 ディ スクに 収録され た GCC VI. 
36. 01 は 日 本 語に 衬応 していない 
ので， ふつうに コンノ 、。ィ ノレした の 
では プログラム 中の メ ッ セージの 
一部が 化けて しまう の だ。 これ を 


表 


ている KN J20CT. X を 使って ソース 巾 の 
全角 文字 を 8 進 エスケープ シーケンスに 変 
換 してやる 必要が あ る。 ソース 卜 本 ごとに， 
KNJ20CT DUMPDIC. C _ DUMPD 
ICC 

とやって， 生成され た— DUMPDIC. C を 
GCC で コンパ ィ ル する。 GCC の 場合， リ ン 
ク 直前で 止める に は， 

GCC - c _DUMPDIC. C 
のように- c スィッチ （c は 小 文';':） を 使う。 
好みに よって は 最適化 ォプシ ョ ン をつ けて， 
GC し - c - O - fstrength - reduce - 
iomit- frame- pointer- nnline- functions 
—DUMPDIC. C 
とで もやれば よい。 リスト 1 のよう なバッ 
チ ファイル を 作れば 楽だろう。 

以上の 作業に よって， カレント ディ レク 
トリに はソ 一スフ アイ ルの 拡張 子が ". 0" 
に 置き換えられた フ アイ ル がた くさんで き 
ている はず だ。 こ れ ら を リンク す れば 実行 
ファイルが 得られる。 XC, GCC の どちら で 
コンパ ィ ル した 場合 も リ ンクに は CC.X を 
使 う のが 楽 だろ う 。 DUMPDIC. X を 作成す 
るの なら 次の よ う になる。 

CC /Y DUMPDIC. 0 PAGENO. 0 
WCLASS.O SELCLASS. O STRFUNC. 
0 MISC.O VFPRINTF. 0 
どの プロ グ ラム も DOSLIB. A, IOCS 
LIB. A を 使用して いるので， 忘れずに/ Y ス 
イッチ をつ ける （Y は 人-文字）。 おっと， 
GCC で コンパイルし た 場 合 に は KNJ2 
OCT を 通 したと きに ファイルお を 変 え て 
しまって いるから 次のように リンクす る。 
CC /Y /ZDUMPDIC. X DUMPD 



dumpdic.x 

gendic.x 

delword.x 

spiitx 

dumpdic.c 

F 舞き , 




gendic.c 


〇 



delword.c 



〇 


split.c 




O 

parseline.c 


〇 

〇 


pageno.c 

〇 


〇' 


selclass.c 

〇 




wcfass.c 

〇 

〇 

o 


strfunc.c 

〇 

〇 



miscc 

〇 

〇 

〇 

〇 

vfprintf.s 

〇 

〇 

〇 

〇 

mydef.h 

〇 

〇 

〇 

o 

misc.h 


〇 

〇 


strfunc.h 

o 


o 


myerror.h 

〇 

〇 

〇 

〇 

dictools.h 

〇 

〇 

〇 



リス 卜 1 KGC.BAT 

knj2oct.x XI, c — Xl,c 

goo -o -O -f strentfth-reduce -f omit- frame-pointer -f inline- functions _X1 . 
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IC.O PAGENO. O ■•• 

最後に な つ た 力 5 , 掲載 し た リ ス ト の 分割 
の 仕方 は 大雑把で あり， 使って いない 開 数 
も 実行 ファイルに 含まれて しまって いる。 
関数 1 個 ご と に 別 ファイルに してお けばよ 
かった の だ 力 5 ， さすがに 20 ~ 30 個 の ォ ブ ジ 
ェクト を リンクして ください， とはいい に 
く かつ た。 どうしても 無駄な コ 一 ドを削 り 
たいとい う 入 は， 各自 対応しても らいたい。 


ネ * * 

という あたり で 来月へ と 続く。 来月 は 辞 
書の 単語 ファイル レベルでの コンバータ と， 
ヮ ン キーで メ ィ ン 辞書 を 切 り 替える 常駐 プ 
口 グラ ム， 本誌に 以前 掲載され た ものより 
も 若干 情報量の 増 え た ASK の 辞書 構造 解 
析 結果 な どが 予定され ている。 

辞書の コンバータ に関して は， PC-9801 
用の メ ジャー ど こ ろからの コン バー トをひ 

リス 卜 £ DUMPDIC. G 


ととお り サ ポー ト するべく 現在 拡張 作業 を 
進めて いる。 コンバータと はいっても， あ 
く まで 単語 ファイルの フォー マツ ト 変換 を 
する フィルタ であり， 過度な 期待 は 遠慮 願 
う 。 ま た， PC-9801 用で もっとも 広まって い 
る 某 ワープロ 用の H 本 語 入力 フロン トェン 
ド プロセッサからの コン バー ト はサ ポー ト 
する つもりがない。 理由 は， 嫌いだから， 
だ。 あらかじめ ご了承 願う。 


： mj 

def . h misc . K atrfunc 

： dosl ib • a iocsl id . a 

： 聿 / 

: # include 

"mydef .h" 

： #include 

<a tdio , h> 

： #inciude 

<atdlib.h> 

： #include 

<ctype ， h> 

： 参 include 

< string . h> 

： finclude 

< limits. h> 

: (finclude 

"dictools . h" 

: #include 

"misc . h " 

: #include 

"a trf unc . h" 

: #include 

"myerror . h" 

： PACKEDSTR 

progname = "DUMPDIC" 

： PACKEDSTR 

usagemes = 


DUMPDIC *X 

A3K68K の 辞書 フ ア' 

dumpdic . c pageno . 
wolass • c atrf uric . 
vfprintf .s 


ル 内容 を 表示す る 
selclass .c 


set index ( index© ， 
ASKtoSJIS{ index, index 0 

for (； q < buff; ) 1 
claascode = *q++ ； 
for ( spec = FALSE; * 


' 畜 - 


"機 能： ASK68K の 辞 
使用法 ： Xb 【ス イツう 

始位 置¥" [¥" 終了 位 厦¥リ』 
¥t/V¥t 動^ を 対象に する ¥n¥ 
¥t/A¥t 形 容阏 /形容 ft ^1 を 対象に 


¥t/N¥t 名 


内容 を 表示し ます Vn¥ 
' ィ ルし DIC〗 ¥ 
[/0 出 カフ アイ ル l¥n¥ 

す る ¥n¥ 



対象 

に す 

る ¥n¥ 

m ( 

固 有 

名 m 

も 

Kt < ) を 対象に する ¥n¥ 

有名 


対象 

に 

す る ¥n¥ 

漢字 

を 対 

象 に 


る ¥n¥ 

ィ ッ 

チ で 

指定 

し 

た 品 39 以外 を 対象に する ¥n¥ 


― に 



対象 品 H を 運択す る 

当 車 

捃 お 

の み 

を 

表示す る ¥n¥ 

出 し 

B を 

半 角 

力 

タ カナで 出力す る *n¥ 

出 し 

B を 

全 角 

ひ 

らが なで 出力す る *n¥ 

出 し 

is を 

全 角 

力 

タ カナで 出力す る （デフ ォ' 

w が 

指定 

さ れ 

な 

い W 合 は 全品 阀 を 対象に すミ 


DONE 





MORE 



( ！ DONE ) 


¥t/H¥t 見 

¥t/G¥t a 

¥t/K¥t 見 


#def ine 
#def ine 


static boolean countonly ; 
static boolean hankaku ； 
static boolean hir&ganB; 
static unsigned int flags ； 
static int maxpage , pageno ； 
static int wordctr = 0 ； 

static void warn{ ) 


fprintf ( atderr, 
"» 告： 辞書の 


目に 異常が 見られます pageno 


static int dumprec( fp, buff, st, 
FILE *fp; 

STRPTR buff, st, ed; 
1 

extern STRPTR classtblt ] ； 
STRPTR p, q， buf f e ； 
STB index0 , index, word; 
unsigned int classcode ； 
int len; 

boolean spec , wf lg = FALSE; 

for ( buffe = buff + PAGE し EN; 
len = »q++ ； 

len += ( ( int ) *q++ ) く < 
if ( len == 8 ) 

return ( MORE ) ； 
buff += len; 


( buff > 
warn ( ) ； 
break ； 


memcpy ( index0 , 
* ( index0 + len 


( strcmp( indexB , 
return ( DONE ) ； 
( strcrapl index0 , 


- word; 
f = *q++ ； 


warn ( ) ； 
wflg = TRUE; 


hankaku , hiragana 

零 q く - 0x1 f ； q++ , spec 
buff & 4 *q >= 0x20； ) 

t I classcode > = 0xlf ) 


if ( ！ strcmp( , word ) ) 

strcpy ( word, index ) ； 
settah( word, 8*3); 

if ( ！ countonly 

fprintf ( fp, "%s%s%8Xe¥n M , 
i ndexO , word , clasatbl ( classcode 
< spec ) ？ " * " ： ■'" ) == EOF ) 
diskfulK fp ) ； 

wordctr++ : 


void main ( argc , argv ) 
int argo; 
STRPTR *ar«v; 
( 

PAGEBUFF pagebuf f ； 
STB st , ed; 

STRPTR dicfile = NULL; 
STRPTR deetf ile = NULL; 
boolean except = FALSE ； 
boolean menumode = FALSE ； 
FILE *aourfp, *destfp; 

int KEYSNS ( void ) ； 

unsigned int selclass { unsigned int 
HEADBUFF »readheader( FILE * ) ； 
int getpagenot HEADBUFF 隼, STRPTR ) ； 
int getmaxpageno( HEADBUFF * ) ； 
void seekpage( FILE 


( **++argv ！ = 
atrchr( SWITCH 
unsigned int sc 
sc = *++*argv 
switch ( tolower( 

case * a ' : 
flags 
break 

case ' d 1 ： 
flags 
break 

caae ' t ' ： 
flags 
break 

caae 'n' : 
flags 
break 

caae ' p ' ： 
flags 
break 

case ' v' : 
f lagH 
break 

case ' e ' ： 
setf lag 
break 

case 'm' ： 
aetf iag 
break 

case ' c ' ： 
setf lag 
break 

case ' h ' : 

setf lag 
break 

case ' g ' ： 

aetf lag 


DELIMITER, 


3 ； —— argc ； 
"argv ) 


&except 


&. menumode 


& •countonly 


1Z34567890123456789012345678901234567890123456789012345678901234567890123M^^^^O^"^^^^^^^^^^^^ 

1111111111222222222233333333334444444444555555555566666666667777777777888888888899 
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190： 


194： 
195： 


break ； 
case 'k* ： 

if ( hiragana I hankaku ) 
usaxe( ) ； 

break ； 
case 'o' : 

setptr( &deBtfile, ++*arav ); 

break ； 
default : 

usage ( ) ； 

break ； 

f 

else if ( dicfile == NULL » ( 

dicfile = chkext( t&rgv, " .DIC" ) ； 
else if ( *Bt == ，¥8' ) ( 

SJIStoASKf at, strzenkatat et , *argv 
else if ( *ed == '¥0' ) ( 

SJIStoASK( ed, strzenkatat ed, *argv 
else { 

usage { ) ； 


216： 


( dicfile == NULL ) 
usage ( ) ； 

{ ( sourf p = f chkopen ( dicfile 
fatal_error ( 

" S 書" b アイ ル [ j がみつ かり ま 


led = UCHAR_MAX ； 
( atrcmpt st , ed ) 
STR tetnp; 
B trcpy ( temp , at 
atrcpy ( at , ed ) ； 
b trcpy ( ed , temp 


if ( flags == 0 tk ！ menumode 

flaga = UINT_MAX ； 
else if ( except ) 


destfp = setstdout ( destf ile 
reaetstdin( ) ； 
breakset ( NULL ) ； 


( ！ menumode I I ( flags = selclass ( f lagB 1 ) != 
HEADBUFF *hp; 

hp = readheader( sourf p ) ； 
pageno = getpagenof hp, at ) ； 
maxpage = getmaxpageno ( hp ) ； 
aeekpage ( aourfp, pageno ) ； 
free( hp ) ； 

for ( wordctr = 0 ； pageno < maxpage ； pageno++ 
KEYSNS( ) ； 

if ( f read{ pagebuf f , 1, sizeof ( pagebuff 


Bourfp 


!= aizeof ( pagebuf f ) ) 
fatal_error( RERROHMES ) ； 
else if ( dumprec ( destfp, pagebuf f , at , ed 

break ； 


( countonly ) I 
if ( fprintf ( destfp, " fif 


:X6d¥n" , wordctr 


diakfull( destfp 
else if ( wordctr ) ( 
fprintf ( stderr, "Xdfi 

elae ( 

fputa( ' '該当する 坩报（； 


> 車 18 が ありまし た ¥n" , wordct 


f close ( aourf p ) ； 
fclose( destfp ) ； 


exit( EXIT— SUCCESS 


リス 卜 3 GENDIC.C 


QBNDIC.X 
*BI ファ' 


新 * に » 書 ファイル を 作成す る 


Sendic .c parseline . c wolaea >o 
8trfunc . c miac .c vf printf . s 
mydef . h miBo . h atrfunc .h myerror. 
doBlib.a iocslib.a 


I include 
linclude 
き include 
き include 
linclude 
linclude 
き include 
tinolude 
linclude 


"mydef .h" 
<stdio.h> 
<Btdlib.h> 
<ctype .h> 


"dictools.h" 
"miac .h" 
"strfunc . h" 
"myerror. h" 


typedef enum 1 

OK, INVLIN, ILLCLASS, BUFFFLOW , 

TOOMANY , DUPW, ILLORD , 
} STAT; 


PACKED8TR prognam^ = "GENDIC" 
PACKEDSTR uaaaemea = 
"観 II : ASK68K の 書 ファイル 
使用法： MAKBDIC [ス イツう 
C】¥n¥ 

¥t/Fn¥t 空 き 容量の » 定 （n 


き define 

■tatio 
static 
at&tio 
static 
Bt&tic 
■tatio 
atatio 
static 
static 
static 
stfttio 
atatio 


NWORD 


M l 単 B ファ 

S 50 % ) ¥n" ； 
( PAGELEN I 


し ま す ¥n¥ 
ィル〗 【/0] 醇， 


STR linbuf ； 

STRPTR wordfile = NULL; 
STRPTH dicfile = NULL; 
int linctr = 0； 
int indexotr = 0 ； 
HEADBUFF header ； 
STR wordbuf [ NWORD J ； 
unnigned ohar clasabuf [ NWORD ] ； 
int size = 0 ； 

PAOSBUFF reobuff , pagebuf f; 
FILE 'aourfp, tdeBtfp; 
int f reeaize = 0 ； 


47: static void varnf wno , lin, str ) 

48： 3 TAT Mno; 

49： int lin; 

60: STfiPTR str; 
51： { 

52 ： stfttio ohar 搴 warnmeBl] = { 

53： NULL, 

84： • '鲡 » 行が あ り まし ft*n1ts", 

56： "鶴 » な JftM 名 は が ありま レ ft*n", 

66： "讀 み 【Xb] に 対 B する 阜 SJ が 1 ページ に 収 ； 


57： 
58： 


'M み 【Xa】 に 対応す る 単 B が 100 钃を 越え 

'二重 登錄は s】 が ありまし た ¥n", 

'単 B のせび 順が 正しく ありませ ん ¥n" , 


り ませんで し た ¥n 
し た *n", 


fprintf { stderr, "X6d:¥t 【警告】 ■' , 
fprintf ( stderr , warnmesl wno 1, e 
if ( wno == ILLORD ) 

f puts ( atr, stdout ) ； 


static void putheader{ 

if 
I I 


( f seek( destfp, 
fwri te ( fcheader , 


SEEK— SET ) 
sizeof ( header ) 

！ = Bizeof ( header 


diBkfulK destfp 


etaLic void putpage 


STRPTR p; 


) ( 


( indexctr く MAX INDEX ) 
if ( fwritet pagebuf f, 

putheader ( ) ; 
diskfulK destfp ) ； 


PAGELEN , destfp ) ！ = PAGELEN 


i = 韋 p++; 


memcpy ( header . index [ indexctr++ 
memBet( paffebuf f , '¥0，, PAQELEN ) 


else { 

putheader ( ) ； 

f atal_error( " 0 1 


ルの 大きさが BB 界を 越え まし： 


static 
STRPTR 


STAT putrect index, otr, f 
index ； 


STRPTR T) = recbuf f + 2: 
int len, mien, tlen; 
int i; 

STAT stAt = OK; 

■len = atrlen< index ) ； 
header. f las [ * index J = TRUE; 
len = 2 + 1 + mien; 
拿 p++ = 雞 len; 
Btropy( p, index ) ； 
p += Mien; 

for ( i = 6; I < ctr; i++ ) t 

tlen = atrlen( wordbuf [ i J ) ; 
If ( len + tlen > PAQELEN ) ( 

stat = BUFFFLOW ； 
) elae t 

*p++ - claaabuf【 i 】i 
atrcpy( p, wordbuf [ 1 】 >; 
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STR index t word, olasa ； 
boolean dflt = TRUE; 
int KEYSNS ( void ) ； 

while ( -— argo ) t 

If ( Btrohr( SWITCH_DELIMITBR , **++arav ) •= NULL ) ( 
uneigned int so ； 
so = 拿 ++»artfv*, 
switch ( tolower ( ao ) ) { 
oaae '¥8 1 ： 

setptr( twordfile, stdin ) ； /tdummy 拿/ 
break; 
case ' f * : 

aetvalue( &f reesize , ++*argv, 0 , 50 ) ； 

break; 
oaee ' o* ： 

aetptr ( idiof ile, ++*argv ) ； 

break ； 
default: 

usage ( ) ； 

break ； 

) 

1 elae if ( wordfilo == NULL ) { 

dflt = FALSE ； 

wordf lie = *artfv; 
) else if ( diofile == NULL ) ( 

diof lie = *argv ； 
> else ( 

ueatfe ( ) ； 

) 

) 

if ( dicfile == NULL ) 
uBage( ) ； 

else 

dicfile - ohkext ( dicfile, ".DIC" ) ； 

resetstdin( ) ； 
if ( dflt ) ( 

aourfp = Btdin ； 

wordfile = "【標準 人力]"; 
) else if ( ( aourfp = fohkopen( wordfile, "r" ) ) == NUL 

L ) { 

fatal_error< ROPBNERRNES , wordfile ) ； 

) 

if ( ( destfp = fchkopen( dicfile, "wb" ) ) == NULL ) 
fatal error ( 

"醉 書ラ アイ ルは が 作成で きません"' diofile )； 

breakset( NULL ) ； 

fprintf ( stderr , 

"登錄 単 fc ファイル ： Xa¥n 登錄 財 象 # 書 ファイル ： XbVii 

wordfile, diofile ) ； 

if (f write < ftheader, 1, aizeof ( header ) , deetfp ) != 8iz 
eof (header ) ) 

diekfulK destfp ) ； 

freesize = ( freesise == e ) ? 2 : freesize 拿 10f 

for ( * index = ，¥«>，, linotr = 1; 

ftfetB( linbuf , NCHAR, Bourfp ) ！ = NULL; linotr++ 》 t 
KBYSNS ( ) ； 

If { paraeline ( linbuf ， index , word ， claaa ) ) 

gendio( index , word, olass ) ； 
elae if ( * linbuf != '¥0' ) 

warn{ INVLIN, 丄 inotr, linbuf ) ； 

) 

gendio( NULL ) ； 

putheader( ) ； 

folosei aourfp ) ； 
foloae( destfp ) ； 

) 


リス 卜 4 DE し WORD.C 


/* 


DELWORD . 
辞 會ファ 


ら単 S を ま 


刖除 する 

； wclaas - c 


delword.c pageno . c parseline . 
atrf unc . c miec ,o vf printf . a 

mydef .h miac . h atrfunc. h myerror .h dictoola . 
doslib . a iocalib.a 


#include 

"mydef .h" 

#iiiclucle 

<stdio.h> 

#include 

<atdlib.h> 

#include 

<ctype . h> 

#include 

<string . h> 

# include 

"dictools .h" 

((include 

"miac . h" 

#include 

"atrfunc . h" 

♦include 

"myerror . h" 

#def ine 

NORMCOLOR 

#define 

SKIPCOLOR 

#def ine 

ERRCOLOR 


25: PACKEDSTR proaname = "DE し WORD" J 

26: PACKEDSTR usagemes = 

27: "機 雜： 単 親 ファイルで 指定され た 単 » を * 

28: ASK68K の 辞 書 ファイルから まとめて M 除し ま す^^ 

29： ft 用法： Xb 【スィッチ] [単 ほ ファイル】 【/0] 辞 害 


ファイル [ ,DIC】¥r 


¥t/E¥t filj 除で きな 力、 つた 単 ほ を DELWORD . ERR に ， 
¥t/V¥t 実行 g 過 を «告 し ます 

static HEADBUFF *hp; 

static PAGEBUFF pagebuff ； 

static STR linbuf; 

static 3TRPTR wordfile, dicfile; 

static FILE *aourfp ( *dicfp, 聿 errfp; 

static boolean report = FALSE ； 

atatio boolean verbose = FALSE ； 

atatic int invalidline = 0: 

static int validline = 0 ； 

statio int linctr = 0 ； 

static int maxpageno ； 

static int curpageno = - 1 ； 

atatio PACKEDSTR errorfile = "DELWORD . ERH" 
#define verboaeprintf if { verbose 


き 出し ま す ¥n¥ 


p += tlen ； 

J 

J 

p = recbuf f ； 
*p++ = len & 6xff ; 
*p++ = ( len >> 8 ) & 0xff ； 
if ( size + len > FAQELEN - freesize ) 
putpage ( ) ； 

memcpy( pagebuff + elze, recbuf f , len ) 
size += len; 


return ( Btat ) ； 


) 


static void tfendic ( index, word, class ) 

STRPTB index, word, cIbbb; 

{ 

static STR index0 ； 

static int ctr = 0, topi in; 

STRPTR wordO = word; 

int olaaa 一 code; 

int tfetclasscodet STRPTR ) ； 

if ( index == NULL ) t 

if ( otr kk putrec( index0, ctr, TRUB ) ) 
Harn( BUFF FLOW , toplin, index ) ； 

} else ( 

if ( ！ strcrop( index , wordfi ) } 

wordO = ( STRPTR ) "«"； 
if ( ！ ( class— code = getclasscode{ clasB ) ) ) { 

varn( ILLCLASS , linctr, claBB } ； 
) else if { *index0 == '¥6* ) ( 
toplin = linctr ； 
SJIStoASK( indexO, index ) ； 
atrcpy( wordbuf [ ctr = 0 ] , word0 ) ； 
claaabuf [ ctr++ 】 = class_code; 
lae ( 
STR temp; 
int cmpetat , i ； 

SJIStoASK( temp, index ) ； 

( ！ ( cmpstat = strcmpl temp, indexO ) ) ) { 
r < NWORD J { 
( otr == 100 ) 
warn( TOOMANY , toplin, index ) ； 
( i = 0; i < otr; i++ ) ( 
if ( clasabuf [ i ] == class— code 

！ atrcmp( wordbuf [ i 】 ， woi*d0 ) ) 1 
warn( DUPW, linctr, word ) ； 
break ； 

} 


Btrcpy ( wordbuf 【 ctr 1, word0 
classbuf [ ctr++ ] = ciass— code 

) 

) 

) elae if < cmpstat > 0 ) t 

if ( putrec{ index0 , ctr, FALSE ) ) 
warn( BUFFPLOW , toplin, index } ； 

toplin = linctr + 1 ； 

strcpy ( indexB , temp ) ； 

strcpyj wordbuf [ otr = 0 】 , word.0 ) ； 

classbuf [ ctr++ 】 = olaaa_code ； 
) else { 

warn( ILLORD, linctr, linbuf ) ； 


void main( artfc , argv 
int argo; 
STRPTR *argv ； 

{ 


u 4 6 6 n 
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と 伝わって 涙が …… 。 谷 口 博一 (24) 人阪 W 


buff, index ) 


typedef enum { 

DONE, NOTFOUND , ERR 
) STAT; 

static STRPTR searchrec{ 
HEADBUFF *hp; 
STRPTR buff, index; 
{ 

int ompstat ； 

STR index0; 

int pageno , len ； 

STRPTR p, q, r; 

void seekpaffe ( FILE 


( paseno = getpageno ( hp, index ) ； 
pageno < maxpageno ； pageno++ ) ( 
if ( curpageno ！ = pageno ) ( 

seekpa^e ( dicf p, curpageno = pageno 
if ( fread( buff, 1, PAGELEN , dicfp 
fatal errorf RHRRORMES ) ； 


buff; 


break; 

memcpy ( indexC , p + 3, p[ 2 ] ) ； 

*( indexO + p[2] ) = *¥0' ； 

if ( ( cmpstat = atrcnpt index0 , index 

return ( p ) ; 
else if ( cmpstat > 0 ) 

return { NU しし ) ; 


static STRPTR searohword( rec， index , word, claaacode , reclen 

).„ _„ : 

STRPTR rec, index , word; 
unsigned int clasacode ； 
int reclen ； 
{ 

STR temp; 

STRPTR p, q, reced; 
boolean atf ； 

atf = ！ strcmp( index , word ) ； 
reced = rec + reclen ； 
rec += 2 + reo[ 2 ] 
for 《 p = rec : rec 


len = rectO ] | ( { { int ) rec[l】 ) << 8 ) ； 
ilen = ( int ) rec [ 2 ] ； 

if ( { dword = searchword( rec , indexO , word, 
claBacode , len ) ) == NULL ) 
return ( NOTFOUND ) ； 
if ( { len = delwordl { rec, dword, len , ilen ) 
( dword = searchHord( rec , indexC , word, 
claaacode , len ) ) ! = NULL ) 
delwordl ( rec, dword, len, ilen ) ； 


dicfp, curpageno ) ； 
fwrite( pagebuff f 1, PACE LEN, dicfp ) ！ = PAGELEN 
diakfullt dicfp ) ； 


reced ； rec 


( q = temp ； 

p < reced kk *p >= 0x20; *q++ 
( * rec ！ = olasacode ) 

continue ； 
= »¥0' ； 

( ！ atrcmp ( temp , word ) 
|| atf & 4 ！ Btrcmpt temp, "©" 
return { rec ) ； 


1 else 


reced »++p 


return ( NULL 


static int delwordl ( rec , dword , len , ilen 
STRPTR rec . dword; 


dword = rec ； 


»reo 
else ( 


rec[0] = l€ 
rec【l】 = ( 


) 

j = ( pagebuff + PAGELEN ) - ( dword + i 
memcpy ( dword , dword + i, j ) ； 
memset { dword + j , '¥0'， i ) ； 


return 


static STAT delword0{ indexB, word, clasacode 
STRPTR indexO, word; 
unsigned int claBacode; 
( 

STR index; 
STAT retcode = ERR; 
STRPTR rec , dword ； 
int len, ilen ； 

void eeekpagej FILE 傘, int ); 


3JIStoASK{ index, indexS 


( ( rec = aearchrec { hp, pagebuff, index 
return ( NOTFOUND ) ； 


DONE 


static STAT delword ( index , word, class ) 

STRPTR index, word, class; 

{ 

unsigned int olasacode ； 
STAT retcode; 

int £etclasscode( STRPTR ) ； 

if ( ( claaacode = getclasscode( class ) ) == 0 ) ( 

verboseprintf { stderr, "¥33[XdmXa¥33[m" , EHRCOLOR, li 

nbuf ) ； 

retcode = ERR ； 

( else if ( delword0( index, word, claBscode ) == DONE ) 

{ 

verboseprintf ( stdout , "%s" , linbuf ) ； 
validline+-f; 
retcode = DONE ； 
) else { 

verboseprintf ( stderr, "V33 { XdmXa¥33 【m" , SKIPCOLOH, 1 

inbuf ) ； 

retcode = NOTFOUND; 

) 

return ( retcode ) ； 


static void windupt ) 
I 

fputs ( "¥33 [m" , stderr ) ； 
if ( invalidline ) 
f printf ( stderr , 

"Xd 行の 無効 行が ありました ¥n", invalidline ); 
if { val idline ) 

f printf ( stderr, 

"%dm の » 瑭を 刖 除し ま した ¥n" , val idline ) ； 

else 

fprintf ( stderr, "則 除 は 行われませんでした ¥n" 


void main ( argc , argv ) 
int argc ； 
STRPTR *argv ； 
{ 

STR index , word, class ； 
boolean dflt = TRUE; 

int KEYSNS ( void ) ； 

HEADBUFF *readheader( FILE * ) ； 

int getmaxpageno( HEADBUFF * ) ； 

for ( ； —— argc ； ) ( 

if { atrchr( SWITCH— DE し IMITER , 拿 聿 ++argv ) != NULL 
unsigned int sc ； 
sc s *++t&rgv; 
switch { tolowerf sc ) ) 1 
case ' ¥0 ' : 

Betptr( &wordf ile , stdin ) ； /本 dL|mniy 零/ 
break ； 
c&se ' e ' ： 

aetf lag ( Areport ) ； 
break ； 
case ' o ' ; 

aetptr( &dicfile, ++*argv ) ； 
break ； 
case ' v ' : 

aetf lag ( fcverboae ) ； 
break ； 
default: 

UBage ( ) ； 
break; 

1 

) else if { wordf ile == NULL ) { 

wordf ile = 拿 argv; 

dflt = FALSE; 
) else if ( dicf ile == NULL ) { 

dicf ile = 零 argv; 
1 else I 

usage ( ) ； 


( dicf ile == NULL ) 
usage ( ) ； 

e 

dicf ile = chkext< dicfile, " .1 

( ( dicfp = fchkopen( dicfile , 
fatal error ( 

' '辞 寄 ラ アイ ル 【Xs】 がみつ かり ま ■ 
( { dicfp = f reopen ( dicfile, " 
fatal error ( 


&'' ) ) == NULL ) 

ノ', dicfile ) ； 

3" , dicfp ) ) == NULL 


► ^紙の^ を 写れ にで も した ら^れ るので はないで すか ？ お, はなん と な く 神秘的な と 
ころが 好きです。 飛 心 和 人 U9)40Kffl; 
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' '辞 香 7 


ルは s】 は 害き 込み 禁止に な 


hp = readheader ( dicf p ) ； 
maxpageno = getmaxpageno ( hp ); 

resetstdin( ) ； 
if ( dflt ) ( 

sourfp = stdin ； 

wordfile = [準 入力 1"; 
} else if ( ( aourfp = fchkopen( wordfile , 

fatal— error( ROPENERRMES , wordfile ) [ 


if ( report ( errfp = f open( errorf lie , 
fatal_error( EOPENERRMES , errorfile > ； 
breakaet { windup ) ； 


ます"， dicfi 


fprintf ( stderr , 
' '刖除 単語 フ： 


:% S ¥n 削除 対象 辞害フ 


wordfile , dicf ile 


( * index = '¥0 
fgeta( linbuf, 


, linctr = 1 ； 
NCHAR, sourfp 


!= NULL; linctr++ 


KEYSNS ( ) ； 

if ( ！ parseline( 1 inbuf , index , word, class 
I I delword( index , word , class ) ERR 
invalidline++ ； 

if ( report && fputs< linbuf , errfp ) == 

diakfulK errfp ) ； 
* index = '¥0' : 


sourfp ) ； 
dicf p ) ； 
if ( report ) 

fclose( errfp 


f close ( 


■lindup ( ) ； 

axit( EXIT_SUCCESS 


り ス卜 5 SP し IT.C 


SPLIT. X 

テキス トを 複数' 


apl i t . c mi sc . 


mydef . h misc . 
doslib.a 


： 分割す る フィルタ 


aetvalue ( &no , +f *argv , 
break ； 


aetptr 
break; 


aetvalue{ &lwidth, ++*argv, NCHAR, INT— MAX 


#include 
# include 
#include 
#include 
# include 
# include 
#include 
#include 

#der me 
#define 


< stdio . ' 
<atdlib 
<string 
(limits 
<doslib 


NLINE 
TEMPNAME 


"SPLTEMP. 


PACKEDSTR progname = "SPLIT" 
PACKEDSTR usagemes = 
"機 能： テキスト を SIS のフ 7 
使用法 ：X3 [スイッチ〗 I 入力：； 
¥t/Bn¥t それぞれが n ノ、' ィ ト以 1 
¥t¥t (ただし， 各 ファイルに 少 
¥t/Ln¥t n 行 ごと に 分割す る ¥n¥ 
¥t/Wn¥t 1 行の Jft 大文字 数 を n 文字に する ¥n¥n¥ 
¥t/B も/ L も 省 略された 場合 は/ とみな す ¥n 

FILE »nextf"e< destfile, no ) 
STRPTR destfile; 


FI し E *fp; 

if { no > 0xff f ) 

fatal_error ( " ft 大分 割 数 を 越え ミ 
sprintf ( temp, "%s%.3X" , destfile, 
li i ( f p = f open( temp , " w" ) ) == 

fatal_crror( WOPENERRMES, temp 
rc turn { f p ) ; 


に 分割し ま す ¥r>¥ 
ル] U/0】 出力 先 ディ I 
るよう に 分割す る ¥n¥ 


ク トリ 


break; 
default: 

usage( ) ； 
break; 

} 

else if ( sourf ile 
aourf ile = *argv ； 
dflt = FALSE; 

else if ( destfile 
destfile = *argv; 

else ( 

usage ( ) ； 


resetstdin( ) 


void mai 
int .&rgc 
STRPTR *argv 


argc , argv 


STRPTR linbuf; 

boolean blflg = FALSE , dflt = TRUE; 
long di vbyt = 0 , bytctr , 丄 inlen ； 
long divlin = 0, linctr ； 
int no = 0, lwidth = 0 ； 
FILE *fpl , *fp2; 
STRPTR aourfile = NULL, 


destfile 


—— argc ； ) { 
( atrchr{ SWITCH 一 DELIMITER , 
unsigned int sc; 
sc = *++*argv ； 
switch ( tolowerf sc ) ) { 
case 1 ¥0 1 : 

aetptr ( &sourf ile , 
break ； 
case 'b' : 

aetf lag( &blf lg ) ； 
divlin = LONG_MAX ； 
set value ( &divby t , 
break ； 
case ' 1 ' : 

setflaa( iblflg ) ； 
divbyt = LONG_MAX ； 
aetvalue( &divlin, 


f pi = stdin ； 
destfile = TEMPNAME ； 
lse { 

struct NAMECKBUF nambuf ； 

if ( NAMECK { aourf ile, &nainbuf ) ) ( 

fatal_error( ILLNAMMES t aourf ile ) ； 
J else if ( { fpl = fopen{ sourfile, "r" ) ) == NULL ) f 

fatal_error{ ROPENERRMES , sourfile ) ； 
) else { 

if ( destfile ==： NULL ) 

aprintf ( linbuf , "%a . " , nambuf .name ) ； 
else if ( strchr( PATH— DELIMITER, *( atrchr( deatfil 
)- 1 ) ) == NULL ) 

sprintf ( linbuf, "16s¥¥%s. " , destfile, nambuf . nam 

else 

sprintf ( linbuf, "%s%b . " , destfile, nambuf . name 
destfile = dupa tr{ linbuf ) ； 


if ( divbyt + divlin == 0 ) { 
divbyt = LONG_MAX ； 
divlin - NLINE; 

if ( lwidth == 0 ) 

lwidth = NCHAR; 
linbuf = memalloc( lwidth ) ； 

breakset{ NULL ) ； 

fp2 = nextf ile( destfile, no++ ) ； 

for { bytctr = linctr = 0 ； f geta ( linbuf , lwidth, fpl J ！ = 

bytctr += 1 inlen , 1 inctr++ 

linlen = strlen( linbuf ) + 1 ； 

if ( bytctr ！ = 0 && bytctr +■ linlen > divbyt 

II ( linctr >= divl in ) ) ( 

f close { fp2 ) ； 

bytctr = linctr = 0; 

fp2 = nextf ile( destfile, no++ ) ； 

1 

if ( fputal linbuf, fp2 ) EOF ) 
diskfull ( fp2 ) ; 

f c 1 oBeal 1 ( ) ； 

exit(— EXIT— SUCCESS ) ； 
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U ス卜 6 PARSELINE.C 


i nclude " myde f .h" 

include <atdio .h> 

include <ctype.h> 

include く string * h> 
include 


boolean parsel ine ( linbuf , index , word , class 
STRPTR linbuf, index, word, class; 


STRPTR p; 

*word = *class = ' ¥0 ' ； 

if { isspace ( * linbuf ) 》 ( 

aecanf ( linbuf , "%b%b " ， word, class ) ； 
} else { 

sscanf ( linbuf , "%s%sXs" , index, word, class 
if ( *word == ，¥0, 

Icti ( p - jatrrchr ( index , ':')))( 

Btrcpy ( word , p ) ； 


) 


( ( len = atrlen( index 
&& ！ jetromp( p = index 


8trisenkat&( index, index 

} 

if ( tclass == '¥0' 

kk { p = jatrrchr ( word, 
atrcpy ( class , p + 2 ) ； 
拿 p ：： *¥0, ; 

) 

if ( ！ strncmp( class , " / " , 2 
atrcpy { claea , class + 2 

return ( * index ！ = '¥0 1 

kk 拿 word != '¥0' kk t 


リス 卜 7 PAGENO.C 


き include 
I include 
f include 
# include 
爹 include 
♦include 
#include 


"mydef .h" 
<stdio .h> 
<io.h> 
<string ,h> 
"miac . h" 
"myerror.h" 


static PACKEDSTR ILLFORMMES 
"指定の ファイル は ASKS8K の 辞 \ 
ではありません （たぶん）"； 

HEADBUFF 拿 readhesder( fp ) 

FILE *fp; 

{ 

HEADBUFF *hp; 


hp = memalloc{ sizeof ( HEADBUFF ) ) ； 

len = f ilelength( fileno( f p ) ) ; 

if ( len < PAQBLEN + sizeof ( HEADBUFF ) 

I I len % PAGELEN != 0 ) 

fatal_error( ILLFORMMES ) ； 
if ( fread( hp, I, aizeof ( HEADBUFF ) , f p ) 
!= sizeof { HEADBUFF 

fatal— error ( RERRORMES ) ； 
return ( hp ) ; 


int getmaxpafleno( hp 
HEADBUFF *hp; 


INDEXTYPE *p; 
int maxpageno ； 


for { maxpageno = 
< hp~> index 


, p 二 hp- > index ； 
MAXINDEX kk "p 


return ( maxpageno 


int getpageno ( hp, 
HEADBUFF *hp; 
STRPTR etr; 
t 

int patfeno ； 
INDEXTYPE temp, 

memset { temp, ' 
strnopy ( temp, 


pageno = 0, 
< hp- > index 


break ； 


return ( ( pageno 


aizeof ( IMDEXTYPE 
sizeof ( INDEXTYPE 


= hp- > index ； 
MAXINDEX kk "p != 


temp, sizeof { INDEXTYPE 
= 0 ) ? pageno -1:0)； 


p++ , pageno+ 


リス 卜 8 SELC し ASS.C 


'include 

"mydef . K" 


iinclude 

<doalib.h 


^include 

<iocBlib. 1 


t include 

"dictoola 

h M 

*def ine 

NORMCOLOR 

3 

tdef ine 

REVCO し OR 

13 

fdef ine 

ESC ( 

0X01 ) 

ま define 

BREAK ( 

0x61 ) 

tdef ine 

CR ( 

OxlD ) 

tdef ine 

ENTER ( 

0x4e ) 

p. 

CUP ( 

0x3c ) 

#def ine 

CDOWN ( 

0x3e ) 

(define 

CRIGHT ( 

0x3d ) 

(define 

CLEFT ( 

0x3b ) 

#def ine 

SPACE ( 

0x35 ) 

♦define 

MENULEN 

18 

unsigned i 

nt selclass 

flagB 

unsigned i 

nt flags; 



unsigned int b ； 
int m=0 , savpoa ； 


► そういえば Oh!MZ の^お J の t ((は 結構 過漱 なィ ラス ト でした ね。 おお で ^ た觉 えが あり ま 

す。 和 Mr な 'I: に iu，, か! ！. 1 ,! 特集 | 辞 害 整備 基本 編 67 


58： 

59 ； void seekpa2e{ fp, pageno ) 

60: FILE 拿 fpj 
61 ： int pageno ； 
62: ( 

63： if ( fseek( fp, pageno * PAGBLEN + sizeof ( HEADBUFF ) , 3 

BK— SET ) ) 
64： fatal_error( ILLFORMMES ) : 

65： ) 


if { C_WIDTH( -1 ) > 1 ) 

C_i5lDTH( 0 ) ； 
C_COLOR ( NORMCOLOR ) ； 
for ( m = 0； m < 30； m++ ) I 

if ( flasca & ( 1 << ( in + 1 ) ) ) 
C„COLOR( REVCOLOR ) ； 

B_PRINT( claas[ m ] ) ; 

C— CO し OR ( NORMCOLOR ) ； 

if ( m X 4 == 3 ) 

B_PRINT( "¥r¥n" ) ； 

B^PRINT( "¥r¥n" ) ； 

C_CURON ( ) ； 

savpoe = C_LOCATE ( -1, -1 ) ； 
C— UP( 8 ) ； 

for ( ； B_KEYSNS( ) ； B_KEYINP( ) ) ； 

for ( in = 0; ； ) ( 

switch ( ( B_KEYINP( ) >> 8 > & 0xff ) ( 
case ESC: 
case BREAK ： 

C— LOCATE ( savpos >> 16， savpos ) ； 

return ( 0 ) ； 

break ； 
case CR: 
case ENTER : 

C_LOCATE ( savpos > > 16, savpos ) ； 

return ( flags ) ； 


" 6 7 CO C 


1- Co i 

^ ^ 鉀^:;51;鉀^弒鉀^鉀辆^詞！|8;合名詞字姓名名名称豳字38^詞詞！£ 

動 動 動 動 動 勖動動 動 動 動 .7 容動榷 合 澳 ft 体 名 尾動統 体 

五 五 五 五 五 五 五 五 五 変 変 容 s« 3 名 名 の j 1 

Ms 力 ガサ タナバ マラ ヮサカ 形 形 動 変名 単 人人 地団 物数»接« 接 削 速 


容サ 

形 


t 


♦include "mydef .h" 

t include く string, h> 

# include <ctype.h> 

# include < j fctype . h > 

# include < iocs lib. h> 

void aettab( a . n ) 
STRPTR s; 
int n ； 
{ 

n -= atrlen( s ) ； 
s = atrohr《 s, ，¥0， 
do { 

拿 s++ = '¥t' ； 
n -= 8； 
} while ( n > 0 )： 


void atrtoupper ( 
STRPTR a; 


2 
3 



break ； 
case CUP: 


) ( 


C_UP_S ( ) 


break ； 
！ CDOWN 


25 ) t 
m += 4； 
C— DOWN— S ( ) ； 


break ； 
e CRIGHT: 


C— RIGHT ( MENULEN ) 

break; 
e CLEFT : 

( m X 4 ) { 

C_LEFT( MENULEN ) ； 

break ； 
e SPACE: 
b = 1 << ( m 蚤 I ) : 
( flags & b ) { 
flags &= "b; 
lse ( 
flags |= b; 
C— COLOR < REVCOLOR 

B— PRINT ( class [ m ] ) ; 
C_LEFT( MENULEN ) ； 
C_COLOR { N0RMCOL0B ) ； 
break ； 


リス 卜 S WCLASS.C 


iskanji { 

if ( 

break : 


) ) I 


else ( 


STRPTR strzentohan{ dest, sour 
STRPTR dest, sour; 


STRPTR p 
WCHAR c, 


deBt ； 


( ; c = *Bour++; ) { 
if ( iskanji ( c ) ) { 

if ( ！ iskanji2( *aour ) ) 
break ； 

c = zentohan{ c < < 8 I *sour+ 十 

switch ( ch = o >> 8 ) ( 
case 0 ： 


break 
case 0xde 
case Oxdf 


*P = 
return 


♦define 


break ； 
default: 

*p++ = 
»p++ = 
break ； 


DHIRAKATA 


( 0x100 ) 


STRPTR strhantozen ( dest, sour , hira^ana } 
STRPTR deat , BOur ； 
boolean hiragana ； 
{ 

STRPTR p = dest, temp = NULL; 
WCHAR c; 

STBPTR dupatr( STRPTR ) ； 

if ( sour == deet ) 

temp = sour = dupstr ( sour ) ； 

for ( ； c = *sour-t-+; ) { 
if ( iBkanji( c ) ) { 

if ( ！ iakanji2( *sour I ) 
break; 

o = ( c くく 8 ) + *sour++; 

if ( ！ hiragana && ( jiahira( o ) ) ) 

o = JIS3FT( SFTJIS( c ) + DHIRAKATA ) ； 

else if ( hiragana fcft ( Jiskata{ c ) ) ) 

O = JISSFT( SFTJIS( c ) - DHIRAKATA ) ； 

*( ( WCHAR * ) p )++ = c; 
J else if ( c == 0xde ) ( 

p += DAK JOB ( p ) * sizeof ( WCHAR ) ； 
) else if ( c == 0xdf ) { 

p += HAN JOB { p ) * sizeof { WCHAR ) ； 
} else { 

拿 （ ( WCHAR ， ) p )++ = hantozen( o 


リス 卜 10 STAFUNC.C 


if ( temp ！ 

f ree{ temp 


STRPTR strzenkata( dest, sour 
STRPTR dest, sour; 


return ( strhantozen ( dest , sour, FALSE 


STRPTR strzenhira( dest, sour 
STHPTB deBt , sour ； 


return < strhantozen! deBt , sour, TRUE 


STHPTR SJIStoASK( dest, sour 
STBPTR deat, sour; 


STRPTR p 
WCHAR c; 


dest ； 


( ； *aour ； ) { 
switch ( c = *{ ( WCHAR 
case 0x8142 : 


) ( 


'ープ の 広告の 右上 隅の ッ タンカ- 


X 1990.9. 


' の 横の 女の 入の 顔が 幽 おみた L 、 で 怖' L 、 。 

a 々野 学 (24) 大 お 府 


I include 
^include 


"mydef .h" 
<string.h> 


STHPTB clasatbl【 1 


p 動 H " 

名' W", 


'力 五 動 H' 
'サ五 動 脚' 


"マ 五 》 請" 
"ヮ五 動 
"力 変動 W" 

"形容 H"， 

"形容動詞 複合 名 M" 

"名 請"' 
"人名 （姓） " ， 
' '地名"， 
"物の: 名称 M ， 
"ft 宇"， 

" M 聘 " ' 


int getclassoode \ 
STRPTR 8； 


( < strcmp{ s, claastbl[ i J ) ) 
return ( i ) ； 



00 


SKSSS 1 SE 台"， 名"， 

動 動 動 動 K 下 ft 複 宇く 名"， BmH 

五 五 五 五 変 . 容変澳 名 体 £ 尾統体 

，ガ タパ ラサ 上 形サ単 人团！ R 接 接 速 


： c = 0x98； 

break ； 

： case 0x8175： 


： c = 0x99； 

break ； 

： case 0x8176 ： 


： c = 0x9a; 

break ； 

： case 0x8141 ： 


： c = ex9b; 

break ； 

： case 0x8145 ： 


： o = 0x9c ； 

break ； 

： case 0x815b: 


に c = 0x9dj 

bre&k ； 

： oase 0x814a: 


： c = 0x9e; 

break ； 

： caBe 0x814b: 


; c = 0x9f ; 

break ； 

： default: 


: if ( o < 

0x829f ) 


entohan( 


else if 
else if 
else 
break ； 


( c < 0x8340 ) 
SFTJIS{ c ) 一 0x2421 
{ c < 0x8397 ) 
SFTJIS( c ) - 0x2521 


*p s •¥ 
return 


dest ) ； 


STRPTR ASKtoSJIS( deat , 
STRPTR dest, sour; 


sour ) 


static WCHAR spctbl [ ] = { 

0x8142, 0x8175, 0x8176, 0x8141, 
0x8145, 0x815b, 0x814a, 0x814b, 

}； 


STRPTR p = dest, temp = NULL; 
WCHAR c; 

STRPTR dupstr( STRPTR ) ； 


I sour 
temp ： 


== deat ) 
sour = dupstr( sour 


= *bout++ ； ) { 

3 < 0X80 ) 

= hantozen( c ) ； 
if { ( 0xal <= c 

+= 0x8340 - 0xal 
if ( ( 0xe0 <= c 

+= 0x8380 - 0xe0 
if ( { 9x98 <= o 


else 
else 
elae 
elae 

c = 0x81a6; 
* ( { WCHAR *) p 


<= 0xf6 
<= 0x9f 


: NULL 
f ree( temp ) ； 


return ( deat 


void eetindex ( deat , aour, hankaku , 
STRPTR dest , sour; 
boolean hankaku , hiragana; 
{ 

if ( hankaku ) 

strzentohan( deat , aour ) ； 
else if { hiragana ) 

strzenhira ( dest, sour ) ; 

else 

strcpy ( dest , sour ) ； 
set tab ( dest, 8*3); 


リス 卜 11 |\/ 

use. c 

1 

#inolude "mydef , h" 




5Q 

1 CL J. £ \Jl \ 1 A ン 1に フ *1 ノ AU-JJJ* 

l'、 《 H* ，.、 ォ " 
いつほい （■ 9 , 

2 

#include <stdio .h> 




59 

, ( devinfo fc 0xlf ) + ，A' ) ； 


3 

#iriclude <stdlib.h> 




60 

) 


4 

♦include < io . h> 




61 



S 

#include く string -h> 




62 

static void ( teleanupf unc ) ( void ) = NULL; 


6 

♦include <ctype • h> 




63 



7 

♦include <jfctype.h> 




64 

void abt ( ) 


8 

♦include <doalib.h> 




65 



9 

# include く signal .h> 




66 

if ( cleanupfunc ！ = NULL ) 


10 

♦include "myerror.h" 




67 

( *cleanupfunc ) ( ) ； 


11 





68 

fatal error { "中睛 しまし た ¥n" ) ； 


12 

typedef void <va_list ； 




69 

) 


13 

#define va start ( ap, parmN )¥ 




70 



14 

{ ap = { ( ( va— list *)(&.( parmN ) ) 

) + 1 

) 


71 

void breakeet { f unc ) 


15 
16 

♦define va_end ( ap ) 




72 
73 

void (*funo) ( ) ； 


17 

extern PACKEDSTR prognaroe ； 




74 

( 

cleanupfunc = func ； 


18 

extern PACKEDSTR usagemes ； 




75 
76 

signal ( SIGINT, abt ) ； 

i 


19 
20 

void uaage ( ) 




77 



21 





78 

void tmemalloc ( size ) 


22 

fprintf ( etderr , usagemes , prognsme ) ； 




79 

unsigned int size ； 


23 
24 

exit( EXIT FAILURE ) ； 

} 




80 
81 

{ 

！ void 韋 pi 


25 
26 

#ifdef ― STDC ― 




82 
83 

if { size == 0 ) 


27 

void fatal error ( STRPTR format, … ) 




84 

i size = 2 ； 


28 

#else 




85 

else if { size 4 1 ) 


29 

void fatal_error( format , ) 




86 

size++ ； 


30 

STRPTR format; 




87 

i for (； ( p = nalloc{ size ) ) == NULL; ) 

{ 

31 

#endif 




88 

■ if ( sbrk( size + 16 ) == ( void * ) 

- 1 ) 

32 

( 




89 

： fatal error ( NOMEMMES ) ； 


33 

boolean uf ; 




90 

ば、， wffi 


34 

va list argptr ； 




91 

return ( p ) ; 


35 

int vfprintf ( FILE * , STRPTR, va— list ) ； 




92 
93 

) 


36 
37 

va_start ( argptr, format ) ； 




94 

void memtest ( size ) 


38 

fprintf { stderr , "%a : " , progname ); 




95 

unsigned int Bize ； 


39 

if ( uf = ( »format < 'VX20' 》 ） 




96 

( 


40 

f ormat++ ； 




97 

free { memalloc ( Bize ) ) ； 


41 

vfprintf ( stderr, format , argptr ) ； 




98 

J 


42 

fputc{ ，¥n，, stderr ) ； 




99 



43 





100 

STRPTR dupatr( atr ) 


44 




101 

STRPTR etrj 


45 

usage( ) ； 




182 



46 

exit( EXIT FAILURE ) ； 




103 

STRPTR p; 


47 

) 




104 

int Btrlen( STRPTR ) ； 


48 





105 

p = memalloc ( strlen ( str ) + 1 ) ; 


49 

void diskfulK fp ) 




106 

return ( atrcpy { p, atr ) ) ； 


50 

FILE *fp; 




107 
108 

) 


51 
52 

i 

int devinf o ； 




109 

STRPTR chkext ( f name , ext ) 


53 




110 

STRPTR f name , ext; 


54 

devinfo = IOCTRLGT( fileno( f p ) ) ； 




til 

( 


65 

if { devinfo & ( 1 << 7 ) ) 




112 

STR name; 


56 

fatal_error( " 出力で きません'' > ； 




113 



57 

else 





atrcpy ( name, fname ) ； 



ドクター， パ ゾコン はい ま. どこで， 何 をして おられる のだろう。 仏:吖1な（17) お ふ: fil; 
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D ス卜 16 MYE 闩 ROR.H 


lifdef ― STDC ― 

void fatal_error( const STRPTR, … ) ； 
き else 

void fatal_error( STRPTR , ) ； 
#endif 

void diakfullt FILE * ) ； 

void uBage ( void ) ； 

void breakset ( void (*)(> ) ： 


if ( ！ strchr( fname , ，ノ 
strcat ( name , ext ) ； 
return ( dupatr ( name ) 


FILE *f chkopen ( fnarae , mode } 
STRPTR fname , mode; 

< 

struct NAMECKBUF nambuf ； 

if ( NAMECK( fname , &nambuf ) != 0 

fatal_error( ILLNAMMES, fname 
return ( f open( fname , mode ) ) ； 


void setf lag ( awp ) 

boolean *swp; 

( 

if ( (拿 swp)++ ) 
UBage ( ) ； 

> 

void eetvalue{ vp, str , min, max 
int *vp; 
STRPTR Btr; 
int min , max ； 


I I ( *vp = atoi ( 


void setptr( dest, sour 
void **dest , *aour; 
t 

if ( *dest ！ = NULL ) 

usage ( ) ； 
tdest = sour: 


void resetstdin( ) 
{ 

int fnol , f no2 ； 

fno2 = dup( fnol 
close( fnol ) ； 
stdin-> file = fn 


fileno( stdin ) ) ； 
2； /***/ 


FILE *eetstdout ( name ) 
STRPTR name; 

( 

FILE *fp; 

if ( name != NULL ) { 

if ( ( fp = fchkopen{ name , "«*' ) ) 
fatal— error < WOPENERRMES , name 

} else { 

fp = stdout ； 


リス 卜 12 VFPRINT.S 


. xdef _vfprintf 

.xdef :fprintf 

.xdef _printf 

.xref _fputc 

•xref ― fmtout 
.xref iob 


_vf printf : 

move . 1 
pea . 1 
jar 

addq . 1 
movea . 1 
btat.b 
beq 

moveq . 1 


(sp>+ , ret+2 

_fputc 

~ fmtout 


«6, 15|a0» 
ret 

#EOF,de 


*FI し E * 
* IOERR 


12(sp) 


move . 1 
move • 1 


4+8(sp) ( -(ap) 
_vf printf 


pea. 1 8( sp) 


リス 卜 17 DICTOOLS.H 


#def ine 
#def ine 
jfdefine 


PAGELEN 
INDEX し EN 
MAXINDEX 


typedef unsigned char 


PAGEBUFF[ PAGELEN ] , 
INDEXTYPE[ INDEX し EN 


typedef struct ( 

INDEXTYPE index [ MAXINDEX 
unsigned char flag [ flxf f ) 
char version; 

) HEADBUFF; 


enum dictypea 
DFLT, ASK, 


4+4(sp) ,-( 
— iob+22 
_vfprintf 
12(ap), B p 


リス 卜 13 MYDEF.H 



SWITCH— DELIMITER "/-" 

#dei ine 

PATH— DELIMITER 

"¥¥/" 

#def ine 

NULL ( ( 

void * ) 0 ) 

#def ine 

EXIT SUCCESS 8 


#define 

EXIT— FAILURE 1 


#def ine 

SEEK SET 0 


#def ine 

SEEK CUB 1 


#def ine 

SEEK_END 2 


#def ine 

NCHAR 256 


typedef 

unsigned char 

* STRPTR, 



PACKEDSTRI ] , 



STR [NCHAR] ； 

typedef 

uns igned short 

WCHAR ； 

typedef 

enum ( FALSE , TRUE , ) boolean ； 

#def ine 

S { STRPTR ) 

#dei ine 

MACRO /* for 

atdio.h */ 


リスト 14 MISC.H 


void tmemal lac { unsigned int ) ； 
void memtest ( unsigned int ) ； 
STRPTR dupstrl STRPTR ) ； 
STRPTR chkextt STRPTR , STRPTR ) 
FILE 零 fchkopen( STRPTR, STRPTR 
FILE *setstdout ( STRPTR ) ； 
void resetstdin{ void ) ； 
void setf lag ( boolean * ) ； 
void setvaluel int *, STRPTR, i 
void setptr ( void ** , void * ) ； 


リス 卜 15 STAFUNC.H 


void settab( STRPTR , int ) ； 
void atrtoupper( STRPTB } ； 

STRPTR strhantozen( STRPTR, const STRPTR, boolean ) ； 

STRPTR atrzenhira( STRPTR, const STRPTR ) ； 

STRPTR atrzenkatat STRPTR , conat STRPTR ) ； 

STRPTR strzentohan( STRPTR, const STRPTR ) ； 

STRPTR ASKtoSJIS( STRPTR, const STRPTB ) ； 

STRPTR SJIStoASK( STRPTR , const STRPTR ) ； 

void setindexl STRPTR , conat STRPTR, boolean, boolean 


#define 
lldef ine 
ffdef ine 
Kdef ine 
#def ine 
jfdef ine 
#def ine 
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U S Ul 


PASCAI^CW' ラミングへ (WS 待 《 4 > 


pascal の 制 awiia 関数お よび 手続き 


Fujiki Takeshi/Fujn Yoshimi 

藤 木健士 /藤 井義巳 


[ 


データ 構造に 続き， 今回 は プログラミングの 基本と なる 制御 構 

造から PASCAL の 特長 を 見て いきましょう。 おまけと して 
逆 ポーランドから 通常の 式への 変換 法の サン ブル プログラム も 
掲載し ます。 


連載 4 回 目に なりました。 今回 はァ ル ゴ リ ズム を プロ 
グラ ミ ング 言語で 記述す るのに 必要な if や while と いつ 
た 条件に よ る 分岐 や 繰り返しの ための 制御 構造と， 関数, 
手続きの 宣言お よび 呼び出し 方 を 説 |リ1 します。 もうす で 
に 皆さん はい く つか プログラム を^いて みられた と 思い 
ますので， も う ぉ1 つて おられる こ と も 多い と AL'. います 力 : , 
整理す ると いう ,な 味 も 兼ねて 詳細 を说 I リ I す る ことにし ま 
す。 


制御 構造に ついて 


； 1 子計萁 機の 歴史が まだ 浅い 頃, プログラマ は少 し で 
も ス ピー ドを 上げる ために， ま た 少ない メ モ リ を 節約 し 

て プログラム を 1 ステップ でも fe!: くす るた めに， もはや 

自分 だけし かわからない よ 5 な 非常に 技巧的な プロ グラ 
ムを誊 いた ものです。 それ はも う^ま じい ものが あ り ま 

した。 最 たる もので は プログラムが n 分 ri ^の ロード さ 
れ ている メモリ に アクセス して n 分 riif を, 1 ：: き 換えな 力 ； 
ら 別の 処现を 行 うような プロ グラ ム を た こ と が あ り ま 

す。 

昔 はソフ ト ウェアが ハードウェアに 強く 依存し, 'j 、規 
模な システム しかむ 'ィ にしな 力' つたので それでも よかった 

のでしょう。 しかも 処理 速度 は 非常に; M く メモリ な ど の 
资 源の 値段が 非常に 高かった ので し かた あ り ませんで し 
た。 しかし， お 近 は ハードウェアが 安くな り， 計算機の 
処现 能力 が 格段に よ 〈なって きています。 また ソフト ゥ 
i ァ に対する 認識が 変化 し て， 処理の か 法 |'1 ^に 価値が 
存在す るよう になって きました。 こうな つてく ると， 識 
にで も わかりやすい プログラム を^く こ とが JI; ^に iR« 
になって き ます。 ii'i 近で は プログラム を わか り やすくす 
るた めの 構造 化 プロ グラ ミン グは も はや ffiiSS と いってい 
いでし よ う。 

PASCAL の設, 汁 ^ヴ ィルト も ダイクストラ が提 し 
た梆 造化 プロ グ ラミング を 強く SSi していた ようで， 
PASCAL に は それ を 可能 とする 制 脚 構造が 含まれて い 
ます。 そ れ では， 今回 は こ の 制御 構造に 関 し て 議す る 
ことにします。 

制 御 構造 は 選択と 操り 返しの 2 つに 分ける. ことができ 
ます。 PASCAL に は 条件 分岐 は if と case, 繰り返しに は 
while と for と repeat が 用意 されて います。 あと goto も 使 
うこと がで きます。 そ れ では そ れ ぞれに ついて 説明 し て 
いきたいと 忍い ます。 


if 

if は もっとも 多く 使われる ステートメントで， これ を 
使えない 手 絞き > や.! の 3 語 は 存在 しないと いっても よ いほ 
どです。 読^の ^ さんに も 馴染みの; おい もので し よ う。 
if 文の かた ち は 次の と お り です。 
if 汆 fi'-j に then 文 

ま たは， 

if 条 f'r-A then 文 else 文 
条件 式 は 論理 型の 結果 を 持つ 式で なければ な り ません。 
ですから ここに は 結 * が 真 （true) かぬ (false) になる 
式 を, 1 F いて く た' さ い。 た と えば 次の よ う な 感じです。 

if i > 1 then 

str := 'CLARIS'; 

あ る いは sw という 変数が 論 a 型 （忘れた 方 は 先 ）i 'ふ 
を 見て 〈ださい） で 'に （， （されて いると すると， 次の よう 
な, 1 :•• き 方 をす る こ ともで きます。 

var sw boolean; 
sw := i > 1； 
if sw then 

str := 'ADDIE'; 

複数の 文 を 実行 したいと き は begin と end で 括って 次 
のよ う に 書いて く ださい。 

if j = 0 then 
begin 

strl := 'SILKIA'; 
str2 := 'CHACKN' 

end; 

eteelr 指定して 条件 式 力 f 偽だった と き に 行う 処理 を 次 
のよう に 指定す る こ ともで きます。 


if rc <> 0 then 
name 

else 

name 


'Ohno 1 


'Takeuchi'; 


このと き i' にな しな けれ ばな ら ない の は， else の 前 に'；' （セ 
ミ コロン） をつ けて はならない という こと です。 PAS 
C A L では else の 前 にはセ ミ コロン 力 ； くる こと はあり ませ 
ん。 こ れは 非' おに 'T(' おな ので 党え ておいて く た' さい。 
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case 

case は 多岐 選択に 用 いられる 制御 構造で 次の ような か 
たち をして います。 

case 式 of 

定数， 定数, …… ，定数： 文； 

定数, 定数， …… ，定数： 文； 

定数, 定数， …… ，定数： 文 
end 

ただし 式 は 順序 型 （整数 型， 論理 型， 文字 型お よび 列 
挙型， 先月 号 参照) でなければ な り ません。 if 文で は 真 か 
偽 かで 2 つに ひ とつの 選択 し かで き ない ので， 値に よ つ 
て 3 つ 以上の 異なる 処理 を 行いたい と き， 記述が 繁雑に 
なること が あ ります。 たとえ ば 次の よ う な 場合に' は ど う 
でしよう 力'。 

if num = 1 then 

day := 'Sun' 
else if num = Z then 

day ：= 'Mori' 

else if num = 6 then 
day := 'Fri' 

else 

day := 'Sat,; 

これと 同様の 処理 を case 文 を 用いて 書く と 次の よう に 
なります。 

case num of 

1： day ：= 'Sun'; 
2: day := 'Mon'; 

5： day := 'Fri'; 
6： day ：= 'Sat' 

end; 

ずいぶん すっきりした でしよう！ 定数の あとに 書か 
れる文 は ひとつの ステート メン ト 力' begin と end で 囲 ま 
れた 複数の ステー ト メ ン 卜で 構成され ます。 それで， case 
文で ひとつの 定数に 対して 複数の 処理 を 行いたい とき は 
'：' (コロン） の あと begin~end で 囲まれた 複数の ステー 
トメ ント を 書いて く ださい。 



次 は 条件が 満た されて いると きに 繰り 返す 命令です。 
次の よ う なかた ち を しています。 
while 式 do 文 

式 は 結果が 論理 型の 値 を 待たなければ な りません。 式 
が true で ある 限り 指定され た 文の 実行 を 繰り返します。 
次の 例 は i の 階乗 を 求める ものです。 

var i， fact ： integer 

read(i); 

fact ：= 1; 


72 Oh! X 1990.9. 


while i > 1 do 
begin 

fact := fact * i; 
i := i 一 1 

end; 

write ('fact = ', fact) ； 

こ の プロ グラ ム は 最初に i > 1 を 評価 して そ れが 真で 
あった ら begin~end で 囲まれた 部分の 処理 を 行い ま す。 
そ れで i カ ？ 1 よ り 小 さ な 値が 読み込 まれた ときには， 1 
を 表示す る こ と にな り ます。 

repeat 

repeat 文の かた ち は 以下の と お り です。 
repeat 

文 ； 

文 

until 式 

例 を 示し ま しょ う。 上と 同じ 階乗 を 求める プログラム 
を repeat~until を 使って 書く と 次の よ うになります。 

var i, fact ： integer 

read(i); 

repeat 

fact := i ； 

i := i— 1; 
until i < = 0; 
write ('fact = ', fact); 

この プログラム は repeat- until で 囲 ま れ た 部分 を 一 
度 実行して， その あと i く =0 を 評価し それが 真になる 
ま で 処理 を 繰 り 返します。 それで i が 1 より 小さ な 値が 
読み込まれた ときには， i を そのまま 表示し ます。 それ 
から repeat と until の あいだに 複数の 文が 存在す る と き 
でも begir ！〜 end で 囲む 必要 は あ り ません。 

repeat 文の while との 違い は while は 文 を 実行す る 前に 
式 を 評価 し て true であ る な ら 指定され た 文 を 実行 します。 
それに 対して repeat は 文 を 実行した あ と に 式 を 評価して 
false であ る な ら 再度 文 を 実行し， 式 力 ? true に なった と き 
ループ を 抜けます。 そ れで repeat 文で は 最低 1 回 は 文 を 
実行す る こ とになります。 

注意 しなければ ならな いのは， 式が false の あいだ ルー 
プ するとい うこと です。 while は 式が true の と き ループす 
る ので 反対です。 ヴィ ル 卜 はお そ ら く 条件 式が true の と 
き プログラムの 続きに 進む， つまり その 下の 処理 を 行う 

と 統一し よ う と 考えた のでし よ う。 C の do ~ while は true 
のとき ループす る ので C に惯れ てい る 方 は 特に 注意 し て 
く ださい。 

for 

for 文 は 回数 を 指定 して ループす る 制御 構造です。 かた 
ち は 次の と おりです。 

for 制御 変数 ：= 初期値 to 最終 値 do 文 


処理の 最初に 初期値 を 制御 変数に セッ ト して 文 を^ 
し， その あと 制御 変数 を 1 ずつ 加算しながら 文 を 繰り返 
し 実行し 制御 変数が 最終 値に 達する まで ループし ます。 
例 を 挙げて 説明 します。 

for i ：= 1 to 10 do 
a [i] := 0; 

これ は， 配列 a を 初期化す る 処理 を 行います。 これ を 
実行す ると a [1] から a [10] までが 0 になります。 for 
文 を 使う 際に 注. 意 し な ければ な らな いのは， for 文で 使用 
される 制御 変数 は 局所 変数で な ければ な らな いという こ 
とです。 局所 変数と いうの は その ブロ ックで 宣言され た 
変数の こ とです。 これ は 制御 変数 は 一時的に^ 理を 制御 
する ために 使われる ものである ので， 非 局所 変数で あ る 
必要 はな く ， プログラムの 安全性 を 高める ために は 局所 
変数に するべき だとの 考えに 基づいて います。 それで， 
関数 や 手続きの 巾で for 文 を 使用す る と き は 必ず 使用す 
る 開 数 や 手続きの プロ ッ クで 制御 変数 を 宣言す るよ う に 
してく ださい。 次の 例 を 見て ください。 

1: program test (input, output) ； 
Z: 

3: procedure print (n ： integer); 
4: var i ： integer; 
5： begin 

6: for i := 1 to 10 do 

7: write ('*'); 

8： end; 
9: 

10: begin 
11: read(n); 
12: print (n) 
13: end. 

(注意 ： 行 番号 は 説明の ためにつ けて あ り ま すが 実際の 
プログラムに は あ り ません） 

この プログラム は 変数 i が print と い ぅ手絞 きの' 卜で 
宣言され ている 局所 変数で あるので コンパ ィ ル する こと 
がで き ます。 そ れ では， 試しに 4 行 目の 変数 n 言の 行 を 
2 行 目に 移して コンパイルして みると' コンパ ィ ラにェ 
ラ 一 を 指摘 される でしよう。 変数 i が 手続 き print の 局所 
変数で な く なった からです。 この 点 for 文 を 使う と き は 制 
御 変数の 宣言 は 注意して く ださい。 

それから for 文で to の 代わ り に downto を 使う こと もで 
きます。 こ れを 使用す る と 制御 変数 を 1 ずつ 減 ら し なが 

ら 処理が 進められます。 

for i := 10 downto 1 do 
a [i] ：= 0; 

とすると 最初 に a [10] : = 0 が 実 行され， それ 力' ら a 
[9] ， a [8] の 順で 処理が なされます。 必要に 応 じて 使い 
分けて く ださい。 

goto 

PASCAL で も 一応 goto 文 を 使用す る ことができます。 


でも これ は 乱 川す る ！： 非常に わかり に く い プログラムが 
できて しまいます。 PASCAL に はせ つかく 構造 化 プロ グ 
ラ ミ ングを 可能 とする よう な 制 造が 提供 さ れ' てい る 
のです から， でき る だけ それら を 使って プロ ダラ ミ ング 
する ようにし ましょう。 し 力' し， goto を 使って もよ いと 
思われる ケース もあります。 その 代表的な ケース は エラ 
一が 発生 したと き に ただちに 処理 を 終了 さ せ な ければ な 
ら ない 場合です。 それらの H 的 のために PASCAL で は 
goto 文が 提供 さ れ ています。 次の よう な かた ち で, i 己述 し 
ます。 

goto ラベ ノレ 
ラ ベル は goto 文が 使用 される llij に定教 されて いなけ 

れ ばな り ません。 例 を 次に 示します。 

label 1000; 

var rc ： integer; 

if re <> 0 then 
goto 1000; 

1000: 
end. 

この 例の よ う に ラベル は 定数 や 変数よ り も以 liii に 定義 
します。 ラベル は 整数で なければ なりません。 この プロ 
ダラ ムで goto 1000 が 実行され る と 制御が end に 移 り プ 
口 グラ ムが 終- j' します。 このよう に goto は 使 ffl す る こと 
はで きます 力 ; ， このよう な 特殊な 場合 を 除いて 使 HI し な 
いほう 力 ； よい- T' しょ う。 

関数と 報 き 

プログラム を 作る と きに は 処理 を 機能 ごとに 分解. し， 
それぞれの 機能 を 関数 や 手続きに ま とめて 記述す る とプ 

ログ ラム を！！ 解し やすい ものにする こ とがで き ます。 ま 
た 何度も 使用す る i 凡 用 性の ある )(!! ：现 は， そ の 処现を 関数 
や 手続 きにして おく と 何度も 同じ 記述 をす る 必要が な く 
なる ので 便利です。 I 剁 数と 手続きの 違い は， 1»1 数 は 値 を 
返し 手 銃き は 処理 を 行 うとい う 点です。 そ れで 関数 は 式 
の 巾で 使用され ますが， 手 統きは 文と して 使; 11 されます。 
そ れ では， 詳しく 説明して い 〈ことにしましょう。 

関数 

ま ず PASCAL で は 関数 は 使用す る 前に 宣言 をして おく 
必要が あ ります。 宣言 さえして しま えば SIN や ROUND な 
どの 関数 と In] じょう に 呼び,' I', す こ と がで きます。 そ れで 
は. ii も 初に 宣言の 記述 法 を 説明し ます。 ^数の かたち は 

次の と お り です。 

function 関数 名 仮 パラメータ リ ス ト ：ゃ化， ； 
ブロ ッ ク ： 

阪 パラメ 一 タリ ス トは 呼び出す と きに 引数 を 指定した 
い 場合に 記述して く ださい。 引数 を 必要と しないと き は 
書く 必要 は あ り ません。 

パラ メータ リスト の 部分に は 仮 引数の 名前 と 型 を 指 
定 します。 この 名前 は その 関数の プロ ッ クで右 効です。 
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型 名の 部分に は ^ 数の 戻り 値の 型 を 指定 します。 ただし 
戻り 値の 型 は 単純 型 または ポィ ンタ 型で なければ な り ま 
せん。 配列 型 や レコード 型 は 関数の 戻り 値に でき ない の 

です。 

ブロック は ラベル 定義， 型 定義， 変数 宣言， 関数お よ 

び 手続 き 定義 と ゎ6ぉ11〜61101で囲 まれた 文から 構成 さ れ 
ます。 説明の ために ひとつ 简 単な 例 を 挙げてみ ま しょう。 

1: program test(input, output); 

2： var a : real; 

3: b, result : integer; 

4: 

5: function power(x:real, y : integer):real; 

6: var i : integer; 

7: work : real; 

8: begin 

9: work ： =1; 

10: for i : = 1 to y do 

11: work : = work * x; 

12： power ： = work 

13： end; 

14: 

15: begin 

16： read(r, b); 

17: result: =power(a, b); 

18: white('result = '.result) 

19: end. 

(注意 ： 行 番号 は 説明の ためにつ けて あ り ますが 'ぶ 際の 
プログラムに は あ り ません） 

こ れ はべ き 乗 を 求め る プロ グラ ム です。 5 行 目 か ら 1»1 
数 power を 宣言 しています。 power は 最初の 引数 は宾数 
型で 2 番目の 引数 は 整数 型で あ り， 戻り 値 は 実数 型で あ 
る こ と を 記述して います。 6 行 S から 13 行 目まで が 1划 数 
power のブロ ッ ク です。 

戻 り 値 は 12 行 B のよう に 関数 名 に 値 を 代入す る ことに 
よって セットし ます。 呼び出す 側 は 17 行 目の よ う に 書き 
ます。 ここで も 引数と して 最初の 引数に 实数 型の 式 を 2 
番目の 引数に は 整数 型の 式 を 与える 必要が あ ります。 戻 
り 値の 型の 指定で すべ きこと が ひとつあります。 こ 
の 型の 指定 は 必ず 型の 名前 を 指定して ください。 つま り 
次の よ うに 書く こと はでき ません。 

function test(i:integer) ： " integer; 

このよ う な と き は 次の よ う に 型 を それ 以前に 定義して 
その 型の 名前 を 指定して く ださい。 

type intp = integer; 
function test(i : integer) : intp; 

も し 上の よ う に "integer のよ う に き 下ろ した かた 
ちで 型 を 指定で きた とすれば この 関数の R り 値 は 変数に 
代入す る こ と 力 5 て' き ないで しょ う。 すべての 変数 はこの 
13*1 数の 戻 り 値 と は 異な る 型 を 待つ こ と に な るから です 

(先月 号の 配列 型 の 説 W の 後半 を 参 )!(<.) 。 

最後に も う 一点， PASCAL は 4 種類の 引数 を极供 し て 


います。 « 引数， 変数' JI 数， 手続き 引数お よび 1»1 数 引数 
の 4 つです。 上の 例の プロ グラ ムの power の 引数 はすべ 
て 値 引数です。 こ こで は call by value で処现 を 行って い 
ます。 値 引数と 変数 引数に ついては 7 月 号の 記事で 考え 
方 を 説明して いますので 参 'タ にして ください。 手 絞き' JI 
数と 関数 引数と は， 引数と して^ 数 や 手続き を 渡せる と 
いう ものです が あま り 使 川し ない 機能です ので 今回 は 説 
明 を 割愛し ます。 

^-ifoc さ 


L 続 きも 関数に 非常 に似ていて， 次のように 記述し ま 


す c 


function 手 綠き名 仮 パラメ 一 タリ ス ト ： 
. ブロ ッ ク ： 

関 数 と 興 な る 点 は 型 名がない という 点 だ けです。 仮パ 
ラメ 一 タリ スト は 開 数 と 同じよう に 必要な ければ: く 必 
要はありません。 このように 宣言す る ことによって read 
と 力' write といった 手続き と 同様に 使用す る こ とがで き 
ま す。 呼び出す と き は write な どと 同じように， 文と して 
手続き 名と 必要なら 引数 を誉 〈だけです。 

おまけ 

全 機種 共通 システムの 記事 を 書いて おられる 石 上さん 
が 6 月 号に 「急募」 として 逆ポーランド式から- W 通の 算 
術 式に 変換す る プロ グラ ム を^ 集 して おら れ たので， 私 
は 「再帰 を 使えば 簡単に できる じ やない か あ」 と 思って， 
1 時間く らいで プログラム を ま-' いて 編集部に 送った ので 
す。 力 5 , テスト もろく にしな かつ た た め 完全 動作 しない 
まったく お 恥ず か し い プロ グラ ム だつ たのです。 しかも 
あとから W てみ ると， 逆 ポー ラ ン ド でな く ポー ラン ド式 
から 普通 式に 変換す る も の だつ たのです。 

そ れで， 今 In! ちょうど PurePASCAL の 連載 も 制御 構造 
と 関数 • 手続き だつ たので "ff さんの 参考に も なる だろ う 
という ことで， おまけと して 「逆 ポーラ ン ド式を 普通 式 
に 変換す る プログラム」 を 紹介し ます。 皆さんが PAS 
CAL を 使って プロ グラ ミ ング する と きの 参考に してい 
ただけば 嬉しく 思います。 逆ポーランド式 （後置 型） と 
は 演算子が 式の 後ろに く る もので， 次の よ う な 感じです。 

瞽通 の 算術 式 逆 ポー ラン ド 記法 

1 a + b a b + 

2 (a — b) *c a b — c * 

3 (a + b) * (c-d) a b + c d - * 

4 a + b * c — d a b c * + d — 

こ の 記述 法はス タツ ク を 使って i ぉ算す ると き に 便利な 
方法です。 数が くると スタックに プッシュして fti; 算 子が 
く ると スタック の 上 か ら 2 つ をと つて 演算し て 結果 を ス 
タ ックに プッシュ する と ^終 的な 結果が ス タツ クの いち 
ばん 上に 得られます。 それで は， プログラム を コンパ ィ 
ル して 実行して みま しょう。 入力 待ち 状態に な り ますの 
で， そこで 逆ポーランド式 を 人力して みて ください。 普 
通の 算術 式が 出力され ます。 

* * * 

年回 は 制御 構造と 関数 • 手続きに ついて 説明 しました。 
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このよう に PASCAL は 構造 化された プログラム を 害-く 

こ と が 可能です。 goto を 多用 して どこから どこ に 制御が 

移る かわからない よ う な スパゲティ プログラム は 書かな 

いで く ださ い。 小手先の 高速 化 は プロ グラ ムを わか り に 

_ くくす る ことが 多い ので， それ はやらずに コンパイラ 技 

リス 卜 1 


術が 進んで きた^ 近で は 高速 化 は コンパ ィ ラが やって く 
れる ものと 考えた ほうがよ いでしょう。 そ の 点 Pure 
PASCAL は 最適化 を やって いないので， まだ ま だ 改善で 
き る 点が た く さん 残されて いますが …… 。 それで は 来月 
またお 会いし ま しょう。 


24 ： end ； 
25： var 
26 ： cs :char ； 
27: ( * 

28： トークン を 切り出す 
29： * ) 

30: function Gei Tokent var IdentS t ring ： St r ID I :K LndOf Token ； 

31 ： var 

32： c :char; 

33: i : Integer; 

34： 

35: procedure Getcl var c : char ) ; ( * 1 文 宇 人力 * ) 

3b: begin 

37: if cs = ' ' then 

38: Read(c) 
39: else begin 

40： c := ca; 

41: cs ： = ' ' 

42: end 
4 3 : end ； 
44: 

45: procedure UnGetc ( c : char ) ； (*C を 入力へ 押し戻す * 

46： begin 

47 ： ca ： = c 

48 ： end; 


59： GetToken ：= NONE 

60: else if c = ' . * then 

6 1 ： GetToken := NON'E 

62: else if ( '0 ' <= c) and (c <= ' 9 ' ) then begin 

63： GetToken ： = NUMBER; ( * JS » > 

64: repeat 

65： IdentStringl i 1 ： = c ； 

66： i := i + 1; 

67： Getc(c) 

68: until (c く '0') or ( ' 9 ' < c) or Eoln ; 

69： UnGetc(c) '(* M みすぎた 文字 を 元に 炭す *1 

70 ： end else if ( ' a ' < = c ) and (c <= ' z ' ) then begin 

71 ： GetToken ：： IDENT; ( S 織 別 子 * ) 

72: repeat 

73： IdentString【i】 c; 

74： i := i + 1 ; 

75： Getc(c) 

76 ： until (c < ' a ' ) or ( ' ?, ' < c ) or Eoln ； 

77: UnGetc(c) ( * M みすぎた 文字 を 元に 戻す *) 

78 ： end else begin 

79 ： case c of 

80= , + , ， , 一 , ， , 拿 , ， ，/ , : 

81 : begin 

82： GetToken OP; 

83 : IdentString【 1 】 i= c 

84 ： end 

85： end 

86: end { if J 

87: end; ( GetToken } 

88： 

89： (傘 

90： 括 ai 付けの 処理 を 行いながら、 抽象 構文木から 式 を 生成す る 

91： 括弧 付け は^ 算 子の 強さ を 比 《 する 


procedure Display 1 t ： TreePtr ) ； 
var 
i : integer ： 

procedure Writeldent |s:Strl0) ； 
var 

i : integer ; 


Noting to 
f ( t" . left* 


Display { t" • le 
Write (')')； 
else 

Di splay ( t " . le 
t = Nil then 
( * Noting to 


Wri teldent ( 
( t = Nil ) or 
(傘 Noting t 


Wri te( ' ( ' 
Display ( 1 
Write! ' ) ' 


DiapLay ( t" . r 
t <> Nil then 

Dispose ( t ) 
nd ； I Di splay 


括弧 はけの & 環 


ill] 


括弧 はけの 処1 


と 2 進 木 を 使 


逆 ボーラ 


纪 法から 通常の 式に 直 


使 う 


procedure Polish2Normal ； 

var 

TokenS tack ： array I 1 . . Stack Depth )of TreePtr ； 

sp: integer ; 

k:KindOfToken; 

t:TreePtr; 

begin ( Pol ish2Normn L I 


repeat 
new( 


GetToken! t 


を スタック 


ら木を 作る 


k <> NONE then begin 
sp : = ap + 1 ; 

Tokens tack [ sp] : = t 

k = OP then begin 

TokenStBcklspj " . left 
TokenStaek[sp] " . righ 
TokenS tack [ 8p-2 1 


： « 算子 だ- 


t : = TokenStacklsp-2) ； 
ht ： = TokenStackl ap- 1 ] ； 
TokenStBCk 【 sp J ； 


else if k <> NONE then begin 
TokenS tack lap] " . left := Nil ； 
TokenS tack [ sp] " . right : = Nil 


until k = NONE; 
Display (TokenStack (ap) ) 
Writeln 

end ； I Pol ish2Normal 


begin { main ) 

Pol ish2Normal 



= = = = = = = = = I'OLISH. I 

' Pol i sh . pas ' * 1 


逆 ポーラ ン 卜- 纪 i£ で « かれた ^ を 通常の 式の^ に 
July. 1»90 by Chack 'n 

使い方： 

A>po 丄 iah / * 

a b + e d - * /* 

(a+bl*tc-d) /* 
f 主 》 ： 

«B 子 は + — */ の 4tt« (すべて 2 項 tff» 子） 
& 字と 変お 名 （アルファ ぺッ ト 小文字） が 使える 

program PoJ ish ( input , output ) ； 
const 
StackDepth = 100 ； 
type 

KindOl'Token = (IDENT, NUMBER, OP, NOSE ) ； 
Strl 0 = Packed array I 1 . . 10 Jof char; 
TreePtr = *SyntaxTree; 
SyntaxTree = record 

k:KindOfToken; 

a:Strl0; 

left, right :TreePtr 


begin 1 GetToken } 
for i ： = 1 to 1 0 do 

IdentStringl i ]:=*'； I * 文字列のお 期 化く PASCAL 

は いやらしい > 聿） 

repeat 

i f not Eoin then 
Getctc ) 

until (c <> ' 1 ) or Eoln; t * スペース を W み 飛ばす 

if Eoln then 



§门 力 

^/入 出 
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BASIC 


X-BASIC プログラミング 調理 実習 (W 


ファイルの 魔術師 fseek 関数 

Izunni Daisuke *^^J 

ファイル 処理の 基本 を 理解した ところで， ちょっとした 高度な 技 を ご 紹介し ましょう。 

一般に ランダム アクセスが 必要な データベース など を X- 已 ASIC で 作る に は ある 命 
令 を使ラ ことが 必要になります。 それが 今回 登場す る fseek 関数と いろわけです。 


先月 は ファイル 処理の 入門 編と して ファイル を 扱 
う う えでの 約束 ご と を 中心に お送り しました。 ファ 
ィルを 扱う に は， まず ファイル を オープンし， デー 
タの 読み 誉き を 行った あ と， 最後に フ アイ ルをク 
ローズす る 必要が ある こと。 ファイルの オープン 時 

に は データ を 読み; h すの か， 書き込む のか， 読み 書 
きする の 力'， ファイル を 新しく 作る のか を 指定す る 
必要が あ る こと。 こ の 指定の こと を モードと いう こ 
と。 思い； i', していた だけ ま した か。 

ファイル を 扱う う えで 大切な ものと して ファイル 
番号が あ り ま し た。 これ は ファイルと 1 対 1 に 対応 
す る 整数で， データの やり取り や ファイル を クロー 
ズ するとき に ファイル 名の 代わりに 使います。 つま 
り， いったん ファイル を オープン すれば， 以後の 作 
業 はすべ て フ アイ ノレ 番号で 行 うとい うこと です。 

先) 1 は これらの こと を 踏まえ， ファイル 処理の 実 

例 として YET の スコア フ アイ ル関 連の 処理 を 行 い 
ました。 トップ 10 の 中から 同一人物 を 削除す る， 2 
つの yetsco フ アイ ノレ を 1 つに まとめる， という 2 つ 
の 処理 を 行 う プロ グラ ム です。 どうでしょう 力'。 役 
に 立って います か ？ 


シーケンシャル か ランダム か 


0 データの 並び （シ一 ケン 
ス） を その ま ま 先頭から 順に 
読み込んで 処理す るので この 
名前が ついています.， 


では 基礎' K 项を 踏まえ， ちょっと 高度な ファイル 
処理 に 挑戦して みましょう。 といっても 命令と して 
は 先月 紹介 した フ アイ ル処 ffl 関係の 命令に た つ た 1 
つ 命令が 加わる だけです。 

先月 扱った BASIC の プロ グラ ムフ アイ ル のこ と 
をち よつ と ALU '出して く ださ い。 フ アイ ルの 先頭に 
は 空白に 続く 行 番号が あ り， その後ろ に 命令が 埋め 
込んで ありました。 このように ファイルの 先頭から 
データ を 順 次 読み込んで いって 初めて 意 味の ある 
デー タ を 取 り 出せる というの は， BASIC の プロ グ ラ 
ム ファイルに 限った ことではありません。 ワープロ 
の 文書 ファイル もそう です し， エディタで 作成す る 
C の プロ グラ ム な どもそう です。 このよう な 性格 を 
もった ファイル をシー ケンシ ヤノ レフ アイ ノレと いい ま. 


す"。 

ファイルに はもう ひとつ， ランダム アクセス ファ 
ィ ノレと 呼ばれる ものが あります。 シーケンシャル 
ファイルが フ アイ ルの 先頭から 順次 データ を 処理 し 
ていく ファイル なのに 対し， こちら は ファイル 内の 
任意の 場所 か ら 直接 デー タ を 取 り 出す こ と がで き る 
という 特徴 を 持って います。 

例 を 挙げて 説 明し ましょう。 ここに 毎日 午前 6 時 
の 気温 を 1 年間 に わ た つ て 記録 した フ アイ ルがぁ る 
とします。 8 月 18 H の 気温 を 調べよう とすると， 
シーケンシャル フ アイ ル では 229 個の デー タ を 読み 
込んで は 捨て， やつ と 230 個 目に tl 的の データに 到 
達する と いう 手順に な ります。 とこ ろが ラ ン ダム ァ 
クセス ファイル では， 230 個 目 のデー タを 一発で 取 
り 出す ことができる のです。 したがって ランダム ァ 
クセス ファイル は データベース のよ う に 任意の デー 
タを 読み出す 必要の ある ファイルに 向いて いる と い 
える でしよ う。 

さて， われら 力な- BASIC では， ファイル を ランダ 
ム アクセス ファイルと して オープン するな ど という 
必要 はなく なって います。 基本的に X- BASIC では 
シーケンシャル ファイル しか 扱わない のです。 げ 
げっ ！ それじゃ ァ 229 個の データ を 読み 捨てる と 
い う 思いつ き り 時 問の かか り そ う な 作業が 必要な の 
か …… と 思われる かもしれ ません ね。 でも 大丈夫。 
落胆す る ことはありません。 X-BASIC は 確 力' に 
シーケンシャル ファイル しか 扱いません 力':， その 代 
わ り データ を 読み書き する 位置 を 自分で 好きな よ う 
に 変える こ とがで き るので す。 
* 位置 ズラ しの 術 

データ を^み 出す， 普き 込む 位置 を 自由に 変えら 
れる？ そう， これが 冒頭で ほのめかした， 追加 さ 
れる 1 つの 関数の 役割です。 
Welcome to X-BASIC 

という データの 入つ た ファイルが ある と しま しょ 
う。 '印 はこれ から データ を 読み出そう とする 位^ 
を 表して います。 ここから 1 文字ず つ データ を 読み 


76 Oh! X 1990.9. 


出して いく と， 

Welcome to X- BASIC 
Welcome to X-BASIC 
Welcome to X-BASIC 

と 読み出す 位置が 1 つ ひとつ 後ろへ ズレ ていき， 
W, e, 1 と データが 読み出され ていき ます。 さて ここ 
で データ を 読み出す 位置 を 3 つ 後ろへ ズラ してみ る 

ことにしましょう。 

Welcome to X-BASIC 

です ね。 ここで 1 文字 読み出す と， 読み出され るの 
は e に な り ま す。 問の 「com」 を 飛ば してし まった わ 
けです ね。 

上で は 1 文字ず つ データ を 読み出 しまし たが， 考 
え 方 は 数値 を 収めた ファイル でも 同 じ です。 
21 23 25 27 29 28 26 24 22 …- -. 

と 毎日の 気温 を 保存した ファ ィ ルが ある とします。 
こ こ で SC 値デー タを 1 つ 読み込めば 21 ) おという 気 
温 を 読み出す こ とがで き ます。 

21 23 25 27 29 28 26 24 22 •••••• 

読み出す 位^ を ここから 4 つ 後ろへ ズラ せば， 次 
は 28 度と いう 気温が 読み出せ ます。 フ アイ ルの 先頭 
を 1 月 1 U だとす ると， そこから 数 tt デー タ 230 個 
分 後ろへ 読み出す 位 置 を 動かせば， 229 個 の デ一 タ 
を 無駄 読み しなくて も 一発で 8 月 18 II の 気温 を 取 
り 出せる という 寸法です。 
*fseek 関数の 使い方 

位置 ズラ し は fseek 関数に よって 行います。 この 関 
数 は， 

fseek(fileNo, offset, mode) 
fileNo ：フ アイ ル 番号 
offset ： オフセット ' 
mode ： モ一ド 
という 書式で 使います。 オフセット というの はいく 
っズラ すかと いう ズラし 量の 設定で， ^数で 指定 し 
ま す。 モー ド も 同じく 整数で， 現在の 読み出 し 位置 
から ズラ すの な ら 1 を 指定し ます。 モー ド はこの ほ 
かに ファイルの 先頭から （mode=0) と ファイルの 
最後から （mode = 2) を 指定で きる ようにな つてい 
ます。 

では 早速 実験して みましょう。 まず は データ を 人 
れるフ アイ ルの 作成です。 test というお liij にし ま 
しょ ラ。 
int fp 



fp = fopem "test", "c" ) 
です ね。 こ れで test という フ アイ ルが 作れ ま し た。 お 
次 は fseek 関数です。 1 つ だけ ズラ してみ る ことにし 
ましょう。 

fseek( fp, 1, 1 ) 
です。 さて， どうな り まし たか ？ 「指定の 位置に 
は シークで きません」 と エラ一 になつ た はずです。 
test ファイル はい ま ft; 成 し た ばか り です か ら ， テ"一 
タ はなに も 入って いません。 データの ない ところへ 
位置 をズラ そう と したために エラーに なった わけで 
す。 

データがない と いってい るので すから， 作って や 
る ことにしましょう。 

int data ( 100 ) 

fwrite( data, 100, fp ) 

fseek( fp, 0,0) 
整数 型の 配列 を 用意し (この 時点です ベて 0 が 入つ 
た 配列 が 作成 される）， その データ を 100 個 保？ ？ し て 
みまし た。 最後に fseek 関数で フ ァ ィ ルの 先頭に ひ:;;';： 
を 動かします。 今度 はどうで すか？ fseek 関数 は 
ちゃんと 動いた でしよ う 力'。 

fseek 関数が 動作 した こと を 確かめた な ら , 次に ど 
こまで 位置 を 動かせる かも, 试 してみ ましょう。 これ 

int 1 

for i = 0 to 999 ： fseekffp, i, 0) ： next 
とやって みれば す ぐに わか ります。 データの ない と 
こ ろへ は 動かせな いのです から， エラーに なった ら 
i を 表示して みれば どこ まで！ P 力いた のかす ぐに わ 力' 
る はずです。 実行して みま しょう。 

ピッ！ エラ 一が? g 生 したと きの i の 値 は， 十 ン 
ト 401 になって います。 100 個 し かデー タ は な に 、 は 
ずな のに 400 個の データ 分た' け 動かせた という こと 
です。 なぜ こん な ことに な る ので しょう 力'。 
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ていった と き， 401 まで ズラ したと こ ろて エラーが 

出た の はこ ういう わけだった のです。 

* 好きな 位置で データ を 読み書き してみ る 

整数 を 収め るに は 4 バイ 卜 必要 だ という こと がわ 
かってし ま えば， 自分の 好きな 位謖 から データ を 読 
み,' I', すの は 簡単で し よ う。 

fseek( fp, 0, 0 ) 
で ファイルの 先頭に 読み書き 位置 を 戻したら， 

for i = 0 to 99 ： data (i) =i ： next 

fwrite (data, 100, fp) 
を 実行 し て く ださ い。 配列の i 番目に i という 数値 
を 入れ， test ファイルに 収めた わけです。 これ を 使つ 
て ほ 分の 好 き な 位お か ら デー タを 取り 出 してみ る こ 
とに します。 

数値 デー タを 取り , 屮, すに は 数値 型 の 配列 を 侬 i 、 
fread 関数 を 使う しか 手が あ りません から， まず デ一 
タ 取 り 出 し 用 に 配列 を 1 つ 用 a します。 
int a(0) 

test ファ ィルの 50 番目に 入って いる データ を 取り 
出して みま しょ う。 これ は， 

fseek( fp, 50 * 4, 0 ) 

fread( a, 1, fp ) 
で OK です ね。 整数 型 は 1 データ 4 バイ ト だ と い う 
こ と を 忘れない でく ださい。 

print a(0) 

として 取り 出 し たデー タ を 表示 してみ ると， 見事 50 
が 表示され ます。 


違う 型の データ を 混在 


皆さん は X-BASIC が 扱 う そ れぞれ のデ一 タが何 
パイ 卜で 表現され ている かが わかり， データ 書き込 
み 読み出し 位置 を 自由に 設定で き るよう にもな り ま 
した。 も う いろいろな 型の データ をファ ィル 内に 混 
在させる こと も 簡 準 にで き る はずです。 簡単な 例 と 
して， ある クラスの 生徒 名と 身長 • 体重 を 収めた デー 
タフ アイ ル' を 作って みま しょう。 

名前 は 漢字 5 文字 分 （10 バイ ト） も あれば 十分で 
しょ う 力 ? ，余裕 を 見て 20 バイ ト 使う ことにし ましよ 
う 。 身 長 は mm 単位の 整数， 体重 は g 単位の 整数で 表 
現 すれば 十分 そ うです。 それぞれ 整数です から 4 + 
4 = 8 バイ ト。 名前 と 併せ る と 1 人 分の データ は 28 
バイ 卜 で 表現 さ れる ことになります。 こ れがク ラ ス 
の 人数 分 続く わけです ね。 イメージ' は 図 1 のように 
なります。 

で は 簡 単 な プログラム を 使って 荬 際 に デー タ を 
フ アイ ルに 書き 込んで み る ことにしましょう， リス 
ト 1 です。 

プロ グラ ムの 先頭で デー タ 人力に 必要 な 変数と 


2) 0~255 (J 16 進 2 桁で 表 
現で きる 数 （I バイ ト： 00,, 
〜FF H )。 コンピュータで はこ 
れを 基本単位 として データの 
サ ィ ズを 表現す る こと が 少な 
く ありません。 


* データの r 大きさ」 

こ れは， 「整数 は 1 文字 分の データで は 表現で きな 

い」 というの が 原因です。 X- BASIC では 文字 型 を 
char 型 と し て 表現 します。 char 型 は 0~255 の範面 
の 整数で， ASCII コー ドの 範囲 と 问 じです 2) 。 ところ 
が 整数 （int 型） は ±21 億と いう 大きな 数 を 扱える の 
です。 とても 1 バイ ト 分の データで 表現で きる 大き 
さではありません。 X-BASIC で 扱 う データ 型と そ 
の 大きさ は， 


□ 

□□□□ 

□□□□□□□□ 

-タ の 大きさ を視 


図 1 身長 • 体重 表の 表現 


char ： 1 ノヾづ ト 

int ： 4 ノ M 卜 

float ： 8 バイ ト 
と なって います。 後ろの 四角 は デ- 
覚 的に 表現して みた ものです。 

上の 例で test フ 7 ィ ルに 収めた 整数 (int) 100 個 分 
は， 文字 （char) でい うなら 4 は-の 400 個 分， すな 
わち 400 バイ ト に 相当す るので す。 そ して fseek 関数 
は， 才フセ ッ 卜 を バイ ト 単位で 指定す るよう になつ 
ています。 test ファイル 内で 読み出し 位置 を ズラし 

I —— S 計^ バイ 卜 1 



名前 1 (20 バイ ト） 



身長 



体重 




名前 2 (20 バイ ト） 



身長 



1 

体重 

| 




名前 3 (20 バイ ト） 



身長 



体重 




名前 4 (20 バイ ト） 



身長 



仃ル 

1 



リス 卜 1 簡単な デ一 夕べ一 ス その 1 


10 str pnamet 20 ] 

20 int height 

30 int weight 

40 dim buf ( 0) 

50 char dummy ( 28 ) 

60 / 聿 

70 int dataNo 

80 int fp 


f p = f open ( data" , "c " ) 
for i=l to 50 

f wr i te ( dummy , 28 , f p ) 
next 

fseekl fp, 0, 0 I 
/* 

for dataNo = 0 to 49 
pname = " " 

input "名前： i pname 

i f pname = " " then break 

input "身長： " .height 

input "お 重： " , weight 

print 

/* 

fwri tes ( pname ， f p ) 
f seek{ fp, 28*dataNo + 20 
buf (0) = height 
fwrite ( buf, 1 , f p ) 
buf ( 0 ) = weight 
fwrite ( buf , 1 , f p ) 
next 

f close ( f p ) 


/* 名前 を登錄 する 
o ) /* 身 S を登玆 する 位 B まで 移動 

/* 身長 を登錄 

/* f 本 ま を 登^ 


/ * データ ペース 作成 
ひ 50 人 分の 領^ を 作成 
/* 先^に 戻す 


用 配 n 
ス 作成 用ダ 


タの 個数 を 保持 


ら 

て る 

し， す 

に 了 

ルカ & 

ヌ人 ら 

を をな 

前前 ル 

名名ヌ 


用 用 用^ 一 

カカカ 登べ 

入 人人 タタ 

前艮整 一 一 

名 身体 デデ 


78 Oh! X 1990. 9. 


データ 書き込みに 必要な 変数 を しています。 40 
行で 宣言 している buf 配列 は 数値 デー タを ファイル 
に 書 き 込む のに 使用。 50 行の dummy 配列 は 最初に 
データベース を 作る のに 使 ffl しています。 

プ 口 グ ラ ム は 'お に 屮. 純で， Jii 初 は デー タ ベー ス 
フ ァ ィ ルの 作成 か ら 'it! まります。 オープンした ら 
dummy 配列 を 50 回 書き込んで, 50 人 分の データ を 
入れる 領域の 確保です。 データがない ところへ は 読 
み 書き 位置 を 移動で きない こと を 忍 い してく だ さ 
i ' 。 域の 確保が 終わ つ た ら fseek 開 数で 読み 書 き 位 
置 を ファイルの 先頭に 戻して おき ます （以上 150 行 
まで)。 

170 行から 始ま る for~next ループが' Ji 際に デー 
タ 書 き 込み を 行 う 部分です。 名 前, 身長， 体重 を input 
命令で 読み込み， 250 行 以降で 順に フ アイ ルに 書き 
込んで い きます。 ここで 注意すべき こ と は， fwrites 
関数で 文字列 を ファイルに 書き 込んだ 場合に は， 書 
き 込んだ 文字 数 だけ し か 読み 書 き 位 fg が 移動 しない 
という こと です。 pname 配列が 20 文字 分 用意 し て 
あるから といって 20 文字 書き込む という わけで は 
あ り ま せん 3 '。 そこで 260 行で fseek 関数 を 使い， 尸， 
前 を 書き込んだ あと 次の 身長 を 書き込む 位置まで 読 
み 書き 位 if: を 動かす 必要が あ る のです。 

for- next はこの 作業 を 名前が ヌルになる か 50 名 
の データ を 人力 し 終わる まで 繰り返します。 つま り， 
名前 を 入力す る と きに^に リ ターン キー だけ を 押せ 
ば 人力 途中で 終了で き るよう になって います。 この 
ために は 190 行 を 忘れて はいけ ま せん。 input 命令で 
値 を 入力せ ずに 1 れに リ ターン キー を 押す と， 前に 
入って いた 値が その ま ま 更新され ずに 採 用されて し 
まいます。 前 1S1 力 ？ 「泉 大介」 だつ た な ら ， 阜に リ 
ターン キー を 押 し た だ I ナ で は pname g 己 列 に は " 泉 

大介" がセ ッ ト さ れた ままに なって しまう のです。 


1 '一夕 を 修正で さるよう に 


このまま では データ を 入力す る こ としかで きませ 
ん から， せめて データの 表示' 修正く らい はでき る 
よ う に 変— おしてみ る ことにしましょう。 いろいろな 
方法が-や えられる でしよう が， こ こ では 最 も 簡単な 
メニュー 選択 式 を 採用す る こ とに します。 

プログラムの 勅 作 を 考えて お くこと にしましょう 
力'。 プログラム を' Ji 行す る と， 

1) データお 小 

2) データ 修正 

3) データ 人力 

4) 終了 

という メニューが 画面に 表示 さ れる ことにします。 
1) ~ 3) の メニュー を 逸 択 すると， さら にデー タ ^'ふ 


を 尋ねて くるよう にしましょう。 長い データ を 常に 
最初 か ら 表示 というの では うん ざ り です し ， デー タ 
修正で は 修正 し た ぃデー タ を 指定 し な ければ な り ま 
せんか ら ね。 データ 入力 も ^ 定 し た 番^の データ 以 
降に 顺に 川して いける というの がいいで しょ う。 

こ の データ 番号 を 元に fseek し て 目 的の 場所へ 読 
み 書き 位置 を 移 勅し， リスト 1 のよう な プログラム 
で データの 人力 • 修正 を 行 うよう に すれば いいで 
しょう。 表示 も 同様です。 では 实 際の プログラム を 
W ていたた' くこと にしましょう 力'。 リ ス ト 2 です。 

まず 最初に やるべき こ と は， すでに data と い う 
ファイル がむ? {f. している かどう か を 調べ る ことで 
す。 fopen 関数 は フ アイ ノレが// し な ければ フ ァ ィ 
ル 番号の 代わ りに一 1 を 返し ますから， 

fp = fopen( "data", "rw' ) 
と し， 返された fp が一 1 力' どう 力' を 調べれば OK のよ 
う に 思われ ます。 しかしそう は 問屋が 卸 しません。 
ダイレクト モ一 ドで， 

print fopen( "abcde", "rw" ) 
など と 存在し ない ファ ィ ルを オープン して みれば す 
ぐに わかります。 エラーになります ね。 では どうす 
るかと いう と， 
error ofi 

という 便利 な 命令が ffl -, なされて いるので す。 こ れ は 
X- BASIC の 外部 関数 (fopen も その ひとつ） でェ 
ラーが ^'1.: しても， そ れを 無投す ると いう 命令です。 
この 命令 は プログラム 巾で しか 使 ffl でき ません。 リ 
ス ト 2 では こ れを 使って data フ アイ ルが 1?. 在. す る 
かどう か を チェックし ています。 ま ず data ファ ィ ル 
を" i-w" モー ドで オープン してみ て fp が _1 でな けれ 
ば それでよ し。 ー1 ならば 改めて "c" モードで ォー 
プン するとい うわ けです。 フ アイ ル が/了: ft す る か ど 
うか を 調べる 定石と して 党え ておいて ください。 

data ファイルが オープン できたら メニュー を 表 
-おし， メニュー 選択に 人り ます。 そ して 押された キー 
によって switch で 処理 を 分ける。 と， こんな;; lt| ィ-で 
プロ ダラ ム は 進んで い きます。 そ れぞれ の 処理が 終 
わった ら冉び メニューに' W つて くるよう にしたい の 
で， メニュー 逸択 '処 理分岐 部分 は while~endwhile 
の ループに してお く のがい いでし よ う。 そうそう， 
データ 番号 を 入力 して もら うの を 忘れて はいけ ませ 
ん。 switch で 処 理を 分け る 前 に 人力 しても らう こと 
にしましょう。 

データ 追加 は リスト 1 の 焼き直しで， addData と 
いう 関 数 で定教 しまし た 。 変 Sii 点 は， データ を 1 
つ だけ 入力す るの かファ ィ ルの i' も 後まで （maxData 
という 変数に 定篛 している） 入力 を 続ける のか を 判 
定 する ようにし た こ と です。 修^ m の プロ ダラ ム を 
fft '単に 作成す る ための 変 —01 です。 こ れ はす ぐで し よ 


3) 一見 不便な ようです が， 
テキストファイル を极 うとき 
に はこう でない と 都合が 悪い 
のです。 I 行書き 込む たびに 
256 文字 分の スべ一 ス がと ら 
れて し まう …一 なんて 車 態 を 
想像して みて く ださい。 
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4) csrlin は X-BASIC が 用意し 
ている システム 変数で， 現在 
力一 ソルの ある Y 座標 を 保持 
している 変数です。 表示す る 
X 座標 だけ を 変更した いとい 
うとき に r カーソル 行 は 今の 
まま」 と 指示す るのに 使い ま 
す。 逆に 「X 座標 は 今の ま ま」 
で Y 座標 だけ 変えたい という 
場合に は， pos という システム 
変数 を 使い， 

locate pos, 10 
のように します。 


う 力' ら， 残る は データ 表示と 修正 だけです ね。 

データの 表示 は dispData という 関数が 受け持つ 
ています。 入力 さ れた データ 番号に 従つ て 読み書き 
位置 を 移動し， 名前， 身長， 体重の 3 つの データ を 
1 行に 表示して い きます。 この 作業 を maxData まで 
繰り返せば ファイル 表示 は 終了です ね。 表示され た 
データ を 確認で き るよう， 最後に キー入力 を恃 つて 
から 終わる ことにし ています。 データの 1 行 表示 は 
lineData という ^数に 任せ ま し た。 これ も 修正 処理 
を 簡単に i 斉 ませたかった からです。 

その lineData 関数 はフ アイ ルに データ を 書き込む 
ときと まったく 逆の こと を 行って いる だけです。 ま 
ず 名 前 を 読み 出 し， 絞いて 身長と 体重 をい つた ん buf 
配列 に 読み出 してお いて 表示 します。 久々 に， 

locate 30, csrlin 
というの が 登場して いますね 4> 。 

最後に 残つ た データの 修正です 力 s ， addDa は 関数 
を 変更し データの 1 行 表示 を lineData 関数に 任せた 
おかげで， 実に 簡単に な り ま した。 editData 関数が 
修正 を 受け持つ 関数な のです 力':， 目的の データに 読 
み 書 き 位置 を 移動 し ， lineData 関数で まず は デ一 タ 
内容 を 表示， 続いて addData 関数 を 呼び出 し て斩し 
い データ を 人力 して もら うだけ です。 

こ れで プログラム は 完成です。 今回 は ちょっと 高 


お願い 

二の X-BAS に プロ グラ ミ ング 調理 実習 も 14 回 を 重ね, 
基本的な 題材 も ほぼ 一巡した 感 があります。 もちろん， 
毎月 毎月 新し い 読者が Oh ！ X を 読み 始める わけです から. 
一通り やれば いいと いう もので もありません ね。 や は 
りテ一 マ を 変えながら も 必要な こと は 何度でも 繰り返 
しゃって いかなければ ならない でし よう。 

さて， 今後への 参考の ためにお 聞き したいの です 力 ; , 

1) コマンド モード を 使えます か？ 

2) BASIC でな にか を やって みたい と 思います か ？ 
という わけで， アンケート ハガキ のす みつ 二に でも 

I) Y 2) N とか 記入して もらえる と 助かります。 もち 
ろんご 意見 も 大歓迎。 よろしく お願いします。 


度な フ アイ ル処理 という ことで， 異な つ た データ 型 
を ひとつの ファイルに 収める 方法に ついて 紹介し ま 
した。 プログラム はこれ ぞ サンプルと いわんばかり 
の 简潔さ です が， 基本 は 理解 !• 、 た だ けたの では な !■ 、 
かと 思います。 自分が 作ろう とする データベースの 
構造に あわせて プログラム を 変更して みて く ださい。 

来月 は 今回の ランダム アクセス ファイル を 踏ま 
え， さらに これ ま での 知識 を 総動員 して カード 型 
データベースに 挑戦して みたい と 思います。 ランダ 
ムフ アイ ルは 今回 紹介した と お り です。 あ と はいか 
に 使いやすく する 力'， 見栄え をよ く する かとい つた 

ところでしょう 力'。 X-BASIC 総 集 編 として 楽しみ 
にして く ださい。 
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566 

for l =dataNo to maxData- 1 


576 

1 ineData ( i ) 


580 

ky = inkeyS ( 0 ) 


590 

if &bc ( ky ) = 27 then break 


600 

next 


610 

print 


620 

input "キー を！？ してく ださい 


630 

n 

C 


640 



650 

func 1 ineData { no ) 


660 

print using "##0" ; no , " ： " ； 


670 

f reads ( pname , f p ) 


680 

print pname ； 

/* 

690 

faeek( fp, 28«no + 20, 0 ) 


700 

f read ( buf , 1, f p ) 


710 

locate 30, csrlin 


720 

print buf ( 0 ) , 


730 

t read ( buf, 1 , f p ) 


740 

print buf ( 0 ) 


750 

endfunc 


760 
770 

/* 

func editData ( ) 


788 

fseek( fp, dataNo»28, 0 ) 


798 

if 

SB 

a 


800 

addData( 1 ) 

/* 

810 

endfunc 


820 



830 

func BddData( mode ) 


840 
850 

int i 

int endNum 


860 
878 

/* 

if ( mode ) then { 

/* 

880 

endNum = dataNo 


B90 
900 
910 

} else { 

endNum = maxData- 1 


920 
930 

ノ * 

f seek( fp, dataNo*28 , 0 ) 

/* 

940 

for i = dataNo to endNum 


950 

pname = " " 

/' 

960 

print "き" ji 


970 

input "名前： " , pname 

/» 

980 

if pname = -'" then break 


990 

input "身長： " .height 


1000 

input " 体 : '', weight 


1010 

print 


1020 

/* 


1030 

レ 

cm 


1040 

fseek( fp, 28 聿 i + 20, 0 ) 

/* 

1650 

buf (0) = height 


1060 

f wri te ( buf r 1, f p ) 

/» 

1070 

buf (01 = weight. 


1Q80 

fwritet buf, 1 , f p ) 

/* 

1090 

next 


1100 

endfunc 



データ 番^ 表； 


身 s 表- 

体 S 表 i 


データ tf 正 


mode 力 1 1 なら 


> だけ 入力 


き 込み 位置まで 移 » 


名 前 を g I* す. 

身畏を a«i す. 


ト巧を 登 》 
： 盧を登 W 


10 str pname 【 20 J 

20 int height 

30 int weight 

40 int maxData = 50 

50 dim buf (0 1 

60 char dummy! 28 J 

70 /* 

80 int dataKo 

90 int fp 

iee /* 

110 int i 

120 str ky 

130 /» 

14 0 error ol'f 

150 f p = f o pen ( " da ta " , " rw " } 

160 error on 

170 If fp = -I then 1 

180 fp = f open 1 "dota" , "c" ] 

190 for i = 1 to maxData 

200 fwritet dummy , 28, fp ) 

210 next 


hen continue 


選択 

逸お i 間 連 I 


f seek ( 

) 

while 1 


print 2| 
print "3 ) 
print "41 
print 
print " > " ； 
ky= inkeyS 

if instr( I , "1234", 
if ky="V then break 
input ' 'データ » ^ : " , 

switch ky 
case " 1 " 
dispData ( I 
break 
case "2" 
editData( ) 
break 
case "3" 

addData ( 0 ) 
break 
endsui tch 
endwhi le 
f close ( fp ) 


func dispData ( ) 
str ky 

fseekf fp, dataNo 


ミ 

グ 

ffl as 

^成 保 

配 作 を 

ぉ甩ス お 

£用£ タ 3S I ほ 

力お 力 一 a ベ の 

入 1C 入デ タ々 タ 

名 身体 ft デデ デ 


正 力 

*s 入 

タタ タ- 

ニー 了 

デデ テ s 
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直接 グラフィック を 操作す る 


Pvnurata foshivuki 


村 田 敏幸 


皆さんの なかに も， あまり DOS コール や IOCS コールのお 世話に 
なつてば かりで はどう も マシン 語 プログラミング らし < な いと 欲求 
不満に なって いる 人 はいません か。 今回 は X68000 の グラフィック 画 
面 を 直接 アクセスして プログラム を 書いて みる ことにしましょう。 


今回 は "単純な わ り に は マシン 語して いる 気分に 
なれる グラフィック" という テーマで 押してみ る。 
IOCS コールの ダラ フ イツ ク 描画 機能に ついて は 前 

回輊く 触れて ある。 パラメータ を 与える だけで 図形 
力 5 ' 描け ると いう 手軽 さ • 簡便 さ 力 f 最大の 長所 だつ た。 
反面， 機能 や 速度の 点で はかな, り 不満が あ ると いう 
の も 事実 だ。 点 や 線， 円と いった 最低限の 図形し か 
描け ないし， 描画 モードの 指定 もで きないし "， 描画 
速度 も それほど 速い と い う わけで はない 2 )。 もう ひ 
とつ， 実は これが いちばん 大きな 不満な の だが， "ど 
う も マ シン 語つ ぼ くなくて" 面白くない。 そういう 

わけで， IOCS を 使わずに 直接 グラフィック 画面に 書 

き 込み を 行う こ と を 考えて みたい。 


グラフィック 画面と アドレス 計算 


グラ フ イツ ク 画面の 実体 はグラ フ イツ ク VRAM 
(Video RAM) と 力' G-RAM と 呼ばれ る メモリで 
あり， この メモリ に データ を 書き込む こ とが グラ フ 
ィ ック 描画に あたる。 

X68000 の G- RAM は （正しい 用語 かど う か は 知ら 
な いが 俗にい う ) 垂直 型で， メモリの 1 ワードと 画 
面 上の 1 ド ッ ト が 1 対 1 に 対応 している。 点 を 打ち 
た け れば， 座標 か ら 算出し た G-RAM 上の アドレス 
に パレ ッ ト コード を 書き込め ばよ い。 XI や PC- 9801 
など 多くの マシンで 採用され ている （いわゆる） 水 
平 型の G-RAM では 単色の P1 面 （プレーン） を 複数 重 
ね 合わせて カラー 表示 を 行う 構成な ので 1 つ 点 を 打 
つのに も プレーンの 枚数 分の 書き込み 操作 を 行わな 
ければ ならず， しかも 横 方向の 8 ドッ 卜が 1 バイ ト 
に まと まっている ために ビッ ト 単位の 操作 も 必要に 
なる 3 )。 扱い やすさと いう 点で は 断然 垂直 型に 軍配 
が 上がる し， 速度の 点で も 多くの場合， 垂直 型の ほ 
うが 有利 だ。 

図 1 ~ 3 に X68000 の G-RAM の 構造 を 示す。 図 1 
は 画面 モー ド 別の メモ リ マップ， 図 2 は实 画面の 大 
きさ 別の 画面 内の ヮー ドの 並び 方， ほ 13 は 色 モー 
ド 別の ワード 内部の 構成 を 表して いる。 特徴 的な の 
は， 画面 モードに 応じて G-RAM の メモリ 空間 上の 


大きさ が 変化す る 点 だろ う 。 最大で は 2 M バイ トも 
の 空間 を 占める。 X68000 の G-RAM は 512K パイ ト し 
かないから つじつまが 合わない よ う に 見え る 力 ? ， 図 
3 を 見て も ら えれば わかる よ う に， 256 色 や 16 色モ一 
ド のとき は 各ヮー ドの 上位 ビ ッ ト が 空いて お り ， 結 
局， 256 色 モードのと き は， 

8 ビ ッ ト x 512 ド ッ ト x 512 ド ット x 2 画面 

= 512K バイ ト 
16 色 モー ド のとき は， 

4 ビ ッ ト x 512 ド ット x 512 ド ット x 4 画面 

= 512K バイ ト 
もしくは， 

4 ビ ット x 1024 ド ッ ト x 1024 ドット x 1 画面 
= 512K バイ ト 
となり， メモリ の 総 容量が 変わ る わ けで はない。 

では， 図 を 参考に， x y 座標から G-RAM 上の ァ ド 
レス を 計算す る 手順 • プ p グラム を 考えて みよ う。 
図 2 を 見れば G-RAM 上の メモリ は 画面の 左から 右 
方向に アドレスが 増 加 し ， 右端で 折 り 返して 下の ラ 
ィ ンの 左端に つながる と いう 形 を している こ とがわ 
かる。 隣り合った ドットの アドレスの 差 は， 左右が 
2 バイ ト ， 上下が 2048 (実 画面 1024 x 1024 ド ッ ト モ 
ード 時） または 1024 (512X512 ドット モード 時) バ 
イトと いう 定数になる。 これから， ページ 0 の 座標 
(x, y) に 対応す る G-RAM 上の ァ ド レ ス は， 実 画面 
1024X1_024 ドッ ト モードの とき， 

COOOOOh+xX 2 + yx2048 
実 画面 512 x 512 ド ッ トモ一 ド のとき， 

C00000h+xX 2+yX1024 
と 導け る。 ぺー ジ 1 以降の 場合 は 先頭 ァ ド レスが 
80000h バイ ト ずつ ずれる だけ だから， その 分 を 足し 
て やれば よ い。 

リスト 1 が 実際に ァ ド レ ス を 計算す る プロ グラ ム 
の 一例 だ。 座標 か らのァ ド レ ス 計算 は これから も た 
び たび 使う こと が 予想 される ので， 独立し た サ ブル 
一 チンと し， 関連 サブルーチンと 一緒に モジュール 
ィ 匕して ある。 

サブルーチン gramadr は d0. w に x 座標， dl. w に 
y 座標 を 入れて 呼び出す と， 対応す る G-RAM 上の 


1 ) X68000 が 初めての マシ 
ン だとい う 人の ために 補足す 
ると， 多くの ホビー マシンの 
BAS にで はグラ フ ィ ック 描画 
時に 描画 を 行う 点の 色と 描画 
色の あいだで さ ま ざまな 演真 
を 行う 機能が 用意され ている。 
XOR (68000 風に いえば EOR) 
モ一 ド など は 画面 上に一 時 的 
に 枠 を 描 く と きなん かに 重宝 
した もの だ。 

I 

2) IOCS コ 一ル 呼び出 し そ 
の ものの オーバーへ ッ ドに加 
えて， 画面 モー ドに 応じた 処 
理の 振り分け や， 厳格な エラ 
一 チェック， 速度よ り も メモ 
リ 効率 を 優先した コ一 ディ ン 
グ などが 速度 を 落とす 要因に 
なって いる。 汎用 性 を 追求す 
ると， どう したって 速度が 银 
牲 になる もの だ。 


3) 逆にい えば， 単色に 限れ 
ば I バイ 卜の 害き 込みで 横 8 
ドッ ト 分が 描け るの が 水平 型 
の 利点と いえる。 
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4) 2048 は 2 の 1 1 乗 だから 1 1 
ビット 左シフ 卜すれば 2048 倍 
した ことになる。 同様に 1024 
は 2 の 10 乗 だから 1024 倍す る 
に は 10 ビッ ト 左シフ 卜すれば 
よい。 


図 1 


実 画面 512X512 ド'. 
B5536 色 1 画面 

COOOOOn 


C80000,, 


ぺ一ジ 0 


実 画面 512X512 ドッ ト 
U 色 4 画面 


C80000,, 
D00000,, 
D80000,, 
E00000,, 


ぺ一ジ 0 


ベ一 ジ 2 


にージ 3 


ァ ドレス を a0 に 返す。 y 座標 を 2048 倍 または 1024 倍 
する 部分 は 遅い 乗算 命令で はな く， ビット シフトに 
置き換えて 計算して いる 4) 。 何ビッ ト シフトす る 力' 
はィ ン クル一 ド している リ ス ト 2 の GCONST. H 内 
で 定数 定義して ある。 

ま た， 描画 ぺー ジの 先頭 ァ ド レ ス は 31 行 以下の 描 
画 ページ を 設定す るサ' ブルー チン apage 内で あ ら か 
じめ 計算し， ワーク gbase にし まって おくよう にし 
た。 これにより， わずかながら アドレス 計算 時の 手 
間 を 省く こ とがで き る。 apage の 中で は ワーク gbase 
にァ ドレス をセッ トす るた * けで はな く， IOCS コール 
APAGE を 呼び出す こ と で IOCS 側に も 描画 ぺー ジ 
の 変更が あった こ と を 伝えて いる。 これ は， gramadr 
(を 利用して こ れか ら 作る サブルーチン） と IOCS の 
グラフィック 描画 機能 を 混在して 使用す る 場合に 備 
えての こ とだ。 

あと， 特殊な 用途に も 対応で きる ように， ワーク 
gbase の 値 を 直 筏 変更す る setgbase, gbase の 値 を 読 
み 出す getgbase の 2 つの サブルーチン を 用意 し て 
あ る 。 gbase を . xdef で 外部 定義せ ずに サブルーチン 
を 通 して 間接的に 読み書き する よう にした のに は， 
モジュールの 独立性 を 保つ 意味が ある。 
• 1024/512 ドッ ト モー ド への 対応 

ここで， リスト 1 は 実 画面が 1024 ド ッ ト の 場合 と 
512 ド ッ 卜 の 場合の どちらで も 使える ようになって 
おり， 条件つ き アセンブル を 利用して， アセンブル 
時に どち らの モード 用 か を 決定す る。 
as gramadr 

のよう に ふつ う に アセンブルす る と 512 ド ッ ト モー 
図 2 


実 画面 512X512 ドッ ト 
25B 色 2 画面 


ド用， そして， 

as gramadr /d 1024 
というよ うに "—1024" と い う シンボル を 定義す る と 
1024 ドッ トモ 一 ド 用の ォ ブジェク トが 生成され る。 
サブルーチンの 中で モードに 応じて 処理 を 振り分け 
る こと もで きたし， なんな ら モー ド 別に 2 つの サブ ル 
一 チン を 用意して も よ かった の だが， 1 本の プロ グ 
ラムで 複数の 画面 モー ドを 使う こと は あまり ないだ 
ろうとい う 判断から， こういう 形式に してみ た。 

条件つ き アセンブル される 部分 は リ ス ト 1 本体で 
はなく， ィ ン クルー ド している リスト 2 中に 隠れて 
いる。 1 ~14 行が 条件つ きで アセンブル される 部分 
だ。 

. ifdef 1024 

(シンボル— 1024 が 定義 さ れ ている とき ァ セン 
ブルされ る 部分） 
. else 

(シンボル _1024 が 定義され ていない とき ァセ 
ン ブルされ る 部分） 
. endif 

のよ う な 形に なって いるの がわ かる と 思う。 

AS. X に はこの ほかに も 数式の 比較 結果に 応じて 
条件つ き アセンブル する 機能が 用意され ている。 こ 
つちの ほう は マクロ 定義の 中で， 


macro DOS2 
. dc. w 

. if size > 8 
lea.l 

. else 


callno, size 
callno 

size (sp) , sp 


DOOOOOm 


-ジ 0 


ベ一 ジ I 


実 画面 1024X 11124 ドッ ト 
16 色 1 画面 

C0OO00,, 

-ジ 0 


実 画面 512X512 ド 

'ン 






0 

+ 2 

+ 4 


(0,0) 

(1,0) 

(2， 0) 

+ I024 

Co, 0 

CM) 

C2, D 

+ 2048 

(0,2) 

(1,2) 

(2,2) 

実 画面 1024X 1024 

K 

ッ 卜 




+ 0 

+2 

4-4 

+ 0 

(0， 0) 

(1,0) 

(2,0) 

+ 2048 

(0, I) 

(1, 1) 

(2, 1) 

+ 4096 

(0,2) 

(1,2) 

(2. 2) 


+ 1020 

+ 1022 

(510,0) 

(511,0) 

(510, 1) 

(511, 1) 

(510, 2) 

(511,2) 

+ 2044 

+ 2046 

(1022,0) 

(1023, 0) 

(1022, 1) 

(1023, 1) 

(1022， 2) 

(1023,2) 


EOOOOOh 
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bit 15 


bitO 


65536 色 モー ド 


パレット コ一 ド (0〜65535) 


bit 15 


256 色 モー ド 


16 色 モー ド 



bitO 


】 一 ド （0〜255) 


bit3 


bitO 


パレット コード 
(0 〜ほ) _ 
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. if size>0 

addq. 1 #size, sp 

. end if 
. endif 

. endm 

のよう な感 じで 使つ たりす る。 この マクロ は DOS コ 
ールの 呼び出し と その後の スタック ポィ ンタ 補正 を 
ま とめた もので， 

DOS2 —PUTCHAR, 2 

D0S2 —WRITE, 10 

DOS2 —EXIT, 0 
のように 利用す る こと を 想定して いる。 条件つ きァ 
セン ブル を 利用 して， 第 2 パラメ ータの fi 直に応 じ て 
addq. は' lea.l の 適切な ほう を 使って スタ ック ボイ ン 
タを 補正す る。 上の 例 は それぞれ， 

. dc. w —PUTCHAR 

addq. 1 #2，sp 


. dc. w 
lea. 1 


—WRITE 
10(sp), sp 




. include iocacall , uc 

3： 


. include cconst . 

h 

5: 


. xdef granadr 
. xdef setgbaee 


6： 


. xdef getgbase 


7： 
8: 


. xdef a page 


9: 


. text 


ie: 




11： 
12： 


(d0.w,dl ,w) a0 = adr 


13： 

gramadr 



14： 
15： 


movem. 1 d0-d2 , - ( sp) 


16: 


ext.l dO 

» 盡 標をヮ 一 ド から 

17: 
18： 


ext.l dl 

* ロング ワードに してお く 

19： 
20: 


moveq . 1 #GSFTCTR , d2 
asl .1 d2,dl 

»y を 2848 ま た は 1024 » す る 

21： 


add.l d0,dl 

* それに x の 2 « を 足す 

22： 


add.l d0,dl 


23： 


add • 1 gbase (pc ) ,dl 

♦0-RAH の 先 R ァ ド レス を 足す 

24： 
25： 


movea. 1 dl , a0 

搴 結果 は a0 で a す 

26： 
27： 


movem. 1 { sp) + t d0-d2 
rta 


28： 





. dc. w —EXIT 
のよう に 展開され る ことになる。 
拳 画面への 害き 込み 

座標から G-RAM 上の ァ ド レス を 得る サブ ルー チ 
ン が 用意で きたと ころ で， グラフ ィ ック 画面に 点 を 
1 個 打って みる。 これ はもう 简 単で， 

move, w x 座標， d0 

move, w y 座標， dl 

bsr gramadr 

move, w ノ、 0 レ ッ トコ— ド， (a0> 
とやれば， 望みの 位置に 望みの 色で 点が 打てる はず 
だ。 ただし， X68000 の G- RAM は ユーザー モード か 
らは アクセス できない ス 一パー バイ ザ 空間 に 害 |J り つ 
けられて いるから， あら かじ め スーパーバイザ モ一 

dl.w = ベー ジ 番号^〜 3) 
IOCS _APAGE 


リス 卜 1 GRAMADR S 


(IOCS にもべ一 i 

ラ一？ 
そうなら 


番， を 伝える 


addi . 
move . 


#GPAGE0,d0 
d0 , gbaae 


180000 fg す る 


-RAM の 先 51 ァ ド 

'—ク にし まう 


を 足す 


apageO: rta 


»APAGE の 戻 り續を «» する 


move . 1 a0 , gbase 


2 base ( pc ) t aO 


1 : .ifdef 、 10； 

2 ： 
3: 

4 

* 実圔 £1024x1024 



4 ： GNPIXEL equ 

5: GNBYTE equ 

6： GSFTCTR equ 

7 : .else 

8： 

9： 

1B24 » 1 ライ ン のビク ■< 
2048 * 1 ラインの バイ 
1 1 *GNBYTEfg する た i 

* 実匾面 512x512 

で » 

- 回 n 

10： GNPIXEL equ 
11 ： GNBYTE equ 

512 
1024 




54 
55 
56 

gbaae ： •( 

1c. 1 
tnd 

OPAQEe 












リス 卜 2 

GCONST.H 

12 

GSFTCTR ec 

tu 

10 






13 
15 

.endif 








16 
17 
18 
19 
20 

GPAGE0 ec 
GPAGEI ec 
GPAOE2 ec 
GPAOE3 ec 

1" 
u 

tu 
u 

SdOOOOO 
$d80OOO 

> > 

f ラ 


クぺ一 ジ 0 

2 
3 

先 w アドレス 

21 

GPALET ec 


Se82O0O 


t ラ 


クバ レツ 卜 

先 5B アドレス 


リス 卜 3 PSETTEST. S 


1 ： 

2： 
3： 


. i nr lude 
, i nc】 ude 
. i nc ludf 

dosr-al L . 
iocsca 1 1 
cons t. . h 

mar 
.mac 


22 
23 
24 



—SUPER 
dO, ( sp) 

* H 行 

* W 在 の ssp を^ j« 

4： 拿 
6： « 

7 ： CSCREEN 
ft 1 nnq ni-3 

. xref 

Uramadr 

equ 16 
equ 5 



25 
26 
27 
28 
29 


move • w 
move • w 
bsr 

move , w 


零、 =256 
«y=256 

*0-RAM 上の アドレス を » 
* 点を打つ 

9： * 
10： 


, text 
. even 




30 
31 
32 


DOS 

addq • 1 

_.SUPER 

* ユーザ一 モー ドへ 《*# 

12: « 
13 ： ent 
14 ： 


lea . 1 

mysp( pc ) , sp 

»sp を W 期 化すろ 


33 
34 
35 


DOS 
. stack 

—EXIT 

了 

15： 
16： 
17： 
18： 
19： 
20： 
21： 


move . w 
move . w 
DOS 

addq . 1 
clr.l 

«DOS GL3 ,-(sp) 
*CSrREEN,-(sp) 
_CONCTRL 
*4 , 8p 

- （spl 

* m 面 を 512x512, ( 
* 初期化 

» ズ 一パ 一ハイ ザ 

5538 色 に 
モードへ 

36 
37 
38 
39 
40 
41 

mystack 
mysp ： 

. even 

.da. 1 
. end 

256 
ent 



X68000 マシン 語 プロ グラ ミン グ 83 


ドに 移行して お く 必要が ある。 

リスト 3 に 簡単な サンプル を 示して おこ う。 当然， 
リスト 1 と リンクして 使う。 65536 色 モー ドに し， 画 
面 中央の 座標 （256,256) に 白で 1 個 点を打つ プ ログ 
ラ ムだ。 サブルーチン gramadr が 正常に 動作 してい 
るか どうか テストす るつ も りで 走らせて みても らい 
たい。 


ボックス を 塗り潰す 関数 


点が 打て ると こ ろまで 漕ぎ着けた。 理屈の う えで 
は 点が 打てれば どんな 図形で も 描け る わけで， あ と 
は 描画 ァ ル ゴ リズム だけの 問題と なる。 試しに X- 
BASIC の グラフ ィ ック 描画 関数の なかで （pset を 除 
けば） いちばん 简 単に 実現で き そ う な fill 関数の 相当 
品 を 作って みる こ とに する。 

fill の 描画 アル ゴリ ズム について は 説明す る まで 
もないだろう。 x 座標 を 1 ずつ 増やしながら 順に 点 
を 打って い く ^理を 長方形の 高さの 回数た' け 繰り返 
せば よ い。 プログラム は 単純な 2 重 ループになる。 
あつ という 間にで きた プログラムが リ ス ト 4。 サブ 
ルーチン だけな ので， 動作 試験に は リス ト 5 の テス 
ト用 プログラム を 利用して ほしい。 

パラメータ は 適当な メモリ 領域に 左上の 座標， 右 
下の 座標， パレ ッ ト コードの 順に 格納し （IOCS コー 
ル FILL と 同じ 形式） ， そ の 先碩ァ ドレス を スタック 
に 稂んで 渡す よ う に 作って ある。 なお， リスト 4 も 


リス 卜 4 GFILL.S 


GCONST.H を インクルードして いるので， ァ セン 
ブル 時に シンボル— 1024 が 定義 さ れて いれば 実 画面 
1024 ド ッ 卜 モー ド用， 定義され ていな け れば 512 ド ッ 
ト モード 用の オブジェクトが 得られる。 今月の 以下 
の プログラム も この ノ リだ。 

順に 見て いこう。 23 行までで パラメータ 力 f , 

d0 = 左上 x 座標 

dl = 左上 y 座標 

d2 = 右下 x 座標 

d3 = 右下 y 座標 
に 取り出される。 25 行で サブルーチン gramadr を 呼 
び 出 し， 左上の 座標に 対応す る G-RAM 上の ァ ド レ 
スを 得る。 それから， 27~28 行で 描くべき 長方形の 
横の ドッ ト数 一 1 と 縦の ドッ ト数 _1 を 求め， これ をル 
ープ カウンタの 初期値と する。 30 行で 描画 色の パレ 
ッ トコ一 ド を dO.w に， 32 行で 水平 ライ ン 間の G- 
RAM 上での ァ ドレスの 差 を dl.w に 入れて いるの は, 
アル ゴリ ズム上 必須と い うわけ ではな く ， 単に， ル 
ープの 内側で 頻繁に 使う 定数 を レジスタに 入れて お 
いて 余分な メモリ アクセス をし なくても 済む ように 
している にすぎない。 

34 行 以降が G-RAM に 書き込み を 行う 2 重 ループ 
だ。 36 ~ 37 行の 内側 の ルー プで 水平 方向 に 線分 を 引 
き， それ を 34~39 行の 外側の ループで 必要な ライ ン 
数 分 繰り返し ている。 水平 方向の 線分 を 引く 部分で 
は， ポスト インクリメント つき アドレス レジスタ 間 
接ァ ドレ ッ シン グカ す 綺麗に 決 まっている。 


を 得る 




. include gconst . h 




24 











26 


bar 

gramadr *( 

,-RAM 上 の アドレス 



.xdef Sfill 




26 







. xref gramadr 




27 


sub . w 

d0,d2 «( 

12= 横 ド ッ ト ft- 1 







28 


sub . w 

dl ,d3 «c 

3= 轘 ド ッ 卜 



.offset 0 




29 






xe: 

.ds.w 1 




30 
31 


move . w 

COL(al ) ,de *C 

0= パレ" ノ トコ 一 ド 


Y0: 

.ds.w 1 




32 
33 


move . w 

#GNBYTE,dl *c 

1= ラ ィ ン M のァ ド 


XI ： 
Y1 ： 

.ds.w 1 
.ds.w 1 




34 

loopl : 

movea . 1 

a& , a 1 *t 

1 = 左 8» ァ ド レス 


COL: 

.ds.w 1 




3S 


move . w 

d2,d4 *c 

4= 横 ド '；/ ト 》-1 







36 

loop2 : 

move . w 

d0, (al ) + 搴 

1 ド' ソ 卜 点を打つ 



.text 




37 


dbra 

d4 , loop2 <c 

4 回綠り 返す 



, even 




38 


adda , w 

dl ,a0 • 

すぐ 下の ライ ンへ 







39 


dbra 

d3, loopl *c 

3 回 鋒り jg す 


gf ill ： 











PARPTR 

= 8 





done : 

movem ■ 1 

(sp)+,dO-d4/a0-Ql 




link a6»*0 






unlk 

a6 


20 


movem . 1 d0-d4/a0-al , - ( sp 






rts 



21 
22 


move . 1 PARPTR {a6 ) ,al 

al- パラ メ ータ 受け a 

t し 翊 《 


45 


. end 



23 


movem . w {all f d0-d3 

d0-d3 に S ffl を 取り t 

U す 







リス 卜 5 FILLTEST.S 


. include doscal 1 . mac 

•xref Rf ill 


. text 
. even 


move . v 
move , (■ 


addq . 1 
move . w 


myspt pc ) , sp 

«DOS_GL3,-(s 
#CSCREEN,-(s 
_CONCTRL 
*4 ( sp 
dO , - ( sp) 


*sp を M 化する 


1 画 面 を 512x512, 65536 色 | 
► 初期化 


f 現在の 掘而 モ' 


"現在 < 


を 待 《 


23 
24 


pea . 丄 

gpara ( pc ( 

* バラ メータ 受け渡し 鎖 « 

25 


bar 

Bf ill 

*boxf ill S-f7 

26 
27 


addq ■ 1 

#4 ,sp 


26 


DOS 

_ SUPER 


29 
30 


addq . 】 

#4 , sp 

» ユーザー モー ドへ復 » 

31 


DOS 

_EXIT 

了 

32 





33 


• data 



34 


- even 



35 





36 

gpara ： 

■ dew 

iee t 100,200. 

200, 12345 

37 





38 


. stack 



39 


. even 



40 





41 
42 

mystack 

.ds.l 

256 


43 

myBp ： 




44 


. end 

en t 
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さて， リスト 4 の gfill に は エラ一 チェック を 一切 
していな いため， 不当な パラメ一 タを 与えて 呼び出 
すと 誤動作したり， パス エラーが 発生した りする 可 
能 性が ある。 エラー チェック をして 実行 速度が 遅く 
なる よ り は， 呼び出し 側で つねに 正しい パラメータ 
を 波す よう 気をつける， というの も ひとつの 考え か 
た だが， ここで は 真面目に エラー チヱ ック する 方向 
で 話 を 進める。 どのような 場合に 誤動作す るか をチ 
エックし， 個別に 対応 を 考えて みょう。 

1) 座標が 実 画面の 範囲 外の と き 

これ は G-RAM の 範囲 外の 変な メモリへ 書き込み 
を 行って しまう こと を 意味す るから， 運が よくて バ 
ス エラー， 運が 悪ければ 暴走す る 危険が ある。 対応 
策と して は， 四隅の どれ かひと つで も 画面の 外 だつ 
たら 描画 を 一切 行わない という 消極的な 案と， 画面 
外に はみ出す 部分 を 切り取って， 画面 内に 収まる 範 
囲の み を 描画す る （クリッピング する） という 案 力 5 ' 
ある。 後者が 望ま しいの はいう まで もない。 

2) 座標の 大小 関係が 狂つ ている とき 
リ ス ト 4 では X— BASIC て' いう， 

fill (511, 511,0, 0, 15) 
のよう な 指定が される こ と を 考慮して いない。 座標 
を データ レ ジス タ に 取 り 出 し た 時点で， d0Sd2, 
dlSd3 であ る も のと 思い込み， 27~28 行で d2 — d0, 
d3 — dl を 求め ループ カウンタの 初期値と している。 
<30〉d2 や dl>d3 の 場合 は 減算の 結果が 負 となり ノレ 
—プ カウンタ として は 使い ものに ならない のに， そ 
の チェック を 怠って いるの だ。 つねに 正しい 動作 を 
保証す る た めに は あら か じ め 座標の 大小 開 係 を 調べ, 
必要な ら d0 と d2, dl と d3 の 値 を 交換して おかな けれ 
ばなら ない。 ちなみに， レジスタ 内容の 交換に は exg 
と いう 命令が 使え る。 
リスト 6 に gfill 用の ク リ ッ ビング サブルーチン を 


示す。 座標 は d0~d3 に 入れて 渡し， クリ ッ ビング さ 
れた 座標が やはり d0~d3 に 返る。 ただし， 指定され 
た 長方形が 完全に 突-画面の 外に ある 場合 は c c r の N 
ビット を 立てて 戻る ことにして ある。 クリッピング 
の 処理 上， dOSd2, dlSd3 でない と 不都合が あるの 
で, どさくさに まぎれ, 座標の 大小 関係の 乱れ も 直して いる。 
なお， X- BASIC や IOCS 同様に 座標の 範囲 を— 
32768~32767 と した 関係で， 座標の 比較 はすべ て符 
号つ き 16 ビッ ト 数と して 行って いる。 

では， リスト 5 にク リツ ピン グサプ ルーチンの 呼 
び 出し をつ け 加えて おく。 23 行の 後ろに， 

bsr gfclip 

bmi done 
の 2 行を揷 入し， また， 5 行の あたりに でも， 

. xref gfclip 
の 1 行 をつ け 加える。 修正が 済んだら， ふたたび 動 
作 試験 をして みょう。 いろいろと 座標 値 を 変えて う 
まく ク リツ ビングで きている かど う か? i 窗 かめて ほ し 


サブルーチンの 高速 化 


とはいえ せっかく 作った サブルーチン だ。 
速度 と 機能の 両面で 少 し パワーアップして やろう。 
順序が 逆の ような 気が しないでも な l 、 が, ま ず 高速 
化から 考える。 アル ゴリ ズムに M して はも ともと 単 
純な ので これ 以上 最適化し よ うがない。 コー ディ ン 
グの うえで も 多少 は 改善の 余地が あ るに せよ， 劇的 
な 効果 は 望め そ う も ない よ う に 見える。 ループの 中 
身で 無駄な こと をして いるよう なら それ を ループの 
外に 追い出す こ と でかな り の 速度 向上が 望め る の だ 
が, リスト 4 では， 最も 内側の ループ は， 
loop2: move, w d0, ul) + 


リス 卜 S GFCLIP. S 


1 


, include 

gconst . 

h 

2 
3 


.xdef 

gfclip 







5 

MINMAX 

macro 

datal ,data2 


6 


local 

skip 


7 


crap . w 

datal ,data2 

* datal > data2 ならば 

8 


b«e 

skip 


9 


exg • 1 

datal t dataZ 

t data 1 t data2 を 交換す る 

ie 

skip: 




11 


endm 



12 
13 


.offset 

0 


14 
15 

MINX: 

.ds.w 



16 

MINY: 

.ds.w 

1 



MAXX: 


1 


18 

MAXY: 

.ds.w 



19 
20 


, text 



21 


, even 



22 





23 


(dO.w.d 

.w)-(d2.w,d3.w) 

を 

24 
25 


cliprect で 指定 された 矩形 鎖 « で クリッピング する 

26 

afclip: 




27 


move . 1 

a0 , - ( ap) 


28 
29 


lea . 1 

cliprect ( pc ) , aC 

- 

3e 


MINMAX 

d0,d2 

»d0<d2 を 保お する 

31 


MINMAX 

dl ,d3 

*dl<d3 を保赃 する 

32 
33 


cmp . w 

MAXX(aO) t d0 

»d0>MAXX ？ 

34 


bgt 

outof acrn 

* そうなら 固 面 外 

3S 


cmp . w 

MAXY(a0) ,dl 

idl>MAXY ？ 

36 


bgt 

outof acrn 

* そうなら 面面 外 

37 







cmp . w 
bit 
cmp , w 
bit 

MINX(a0) ,d2 
outof acrn 
MINY(a0) t d3 
outof acrn 

*d2<MINX ？ 
* そろなら 
*d3<MINY ？ 
* そ う なら 

B 面 外 
S 面 外 


cmp .u 
bge 

move . w 

MINX(a0) ,d0 
akipl 

MINX(a0) ,d0 

*d0<MINX ？ 
* そろなら 

修正 

, skipl ： 

crop . w 
bse 

move . w 

MINY{a0) ,dl 
skip2 

MINY(a0) ,dl 

♦dKMINY ？ 
* そうなら 

修正 

： skip2 ： 

cmp . w 
ble 
move ,w 

MAXX(aO) ,d2 
skip3 

MAXX(a0) ,d2 

*d2>MAXX ？ 
* そうなら 

« 正 

： skip3 ： 

cmp. w 
ble 
move .w 

MAXY{a0) ，d3 
akip4 

MAXY ( a0 ) ,d3 

*d3>MAXY ？ 
* そうなら 

» 正 

： skip4 ： 
： done ： 

cmp. w 
moves • 1 
rts 

( sp)+,a0 

*N = 0 


： outof acrn ： 

： movea . 1 

； bra 

#-l t d0 
done 

*N=1 


, cl ipre< 

Jt: 

.dew 
.dew 
.dew 
.dew 

0 

e 

GNPIXE し 一 1 
GNPIXEL-1 

» クリ、 ：； ビン 

グ観 《i 
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dbra d4， loop2 
という こ れ 以上 は 簡単に な ら ない 形 だし， 外側の ル 
—プ にも 極端な 無駄 は 見られない。 唯一， 34 行の 
movea は 工夫 次第で は 省略で きそう だ。 が, 36〜37 
行の ループで 食う 時間に 比べれば 転送 命令 1 つの 実 
行 時間なん か 気にならない 程度と いう こ とで 無視し 
てし まおう。 

ど う も 真正直に やって いたので は それほど 速く な 
りそう もない ので， ループ を 展開 するとい う 姑息な 
手段 を 検討して みる。 話 を 簡単に する ために 描く 長 
方形の 横幅 はつねに 512 ドッ ト という ことにし， 最も 
内側の ループ だけ を 取 り 出 して 考える。 いまこ のル 
—プ は， 

move, w #512 — l，d4 
loop: move, w d0， (aO) + 

dbra d4， loop 
と いう 形に なって いる わけ だ 力 ? ， これ を， 

move, w #512/2 — l'd4 
loop: move, w dO, (aO) 十 

move, w dO, (aO) + 

dbra d4, loop 
のように 書き直せば， ループ 回数， すなわち dbra の 
実行 回数 を 半分に 減らす ことができる。 さらに は， 

move, w #512/4—1， d4 
loop: move, w d0， (aO) + 

move, w dO, (aO) + 

move, w dO, (aO) + 

move. w dO, (aO) + 

dbra d4， loop 
とすれば dbra の 実行 回数 は 4 分の 1 だ。 こ の 話 をず 


—つ と 突き詰め てい く と， 

move, w dO, (aO) + 
を 512 個 並べて しま えば， dbra を 一度 も 実行し な く 
て 済む 計算になる。 ループ を 展開す る と はこうい う 
こ と だ。 

当然の よ う に プログラム はだら だら と 長くなる。 
move, w dO, ほ 0) + 
は 1 ワード 命令 だから， 512 個 並べれば 1024 バイ ト 
だ。 これ は 通常の サブルーチンの 大きさ と 比べれば 
決して 小さな 数字で はない。 し 力' し， X68000 の メイ 
ン メモリ は fd 氐 でも 1M バイ ト， 最近で は 2 M バイ 
トが 当たり前 だから， 割合と して は 無視で きる 範囲 
だとい える。 ループの 展開 は芸 もなければ 品 もない, 
テクニックと 呼ぶ の も 恥ず か し い， 姑息 以外の な に 

も ので も ない 手段で は あ る が， それによ つても たら 
される 速度の 向上 は大 き な 魅力 だ。 あくまでも 最後の 
切り ネ しとして， 多少 は 照れた フリ をしながら 使う よ う 
に したい。 

さて， 512 ドッ トの 水平線 を 描く だけな ら これで 話 
は 終わり だ 力 f ， 現実に は 線分の 長さ は 可変 だ。 この 
あたりへの 対応 も 考えて おこう。 いま， 512 個の， 

move, w dO, (aO) + 
と rts か ら なる hline と い う サブルーチン があった と 
しょう。 』 が G-RAM 内 を 指して い ると すると， 
hline の 先頭 か ら 実行す れば dO. w で 指定 された パレ 
ッ トコ一 ドで 512 ド ッ 卜 の 水平線が 描け る わ けだ。 そ 
れ では， hline の 先頭の move を 1 個 飛ばして， その 直後 
から 実行 すれば どうなる だろう 力'。 そう， 511 ドッ ト 
の 線分が 描け る。 2 個 飛ばせば 510 ドッ トだ。 さっき 
も 触れた よ う に， 


今月 登場した 68000 の 命令 


リスト I で 使った ext 命令 はお そらく 初 登場 
だと 思う。 二の 命令 は データ レジスタ を 強制的 
に 符号 拡張する 命令 だ。 符号 拡張と は， 符号つ 
き 数の 正負と 値 を 変えずに， より 長い ビット 長 
のデ一 夕に 変換す る こと だ つ た。 
ext. w dO 

は， dO.b を 符号 拡張して 16 ビット データに し， 
dO.w に 結果 を 残す。 2 の 補数 表現での 符号 拡張 
は， 上位 ビット を 元の データの 符号 ビットで 満 
たす のと 等価 だから， 上の 命令 は， 

tst. b dO 

bmi minus 

andi.w #$00ff , dO 

bra next 
minus: ori.w #$ff00, dO 
next: 〜 

を 1 命令で 実行して しまう ものと 思っても よい 
だろう。 また， 
ext. I dO 

は dO.w を 32 ビッ 卜に 符号 拡張して dCU に 結果 を 
残す。 この 勳作 は， 

tst. w dO 

bmi minus 

andi. I #$00〔)0ffff, dO 

bra next 
minus: ori. I #$ffff0000, dO 


に 等しい。 

つづいて， リスト 4 などの movem に 
角 虫れ てお 二 う。 movem は， 

movem. I dO 一 d7/a0 一 a5, 一 (sp) 


ついて も 


movem. I (sp) + , d0-d7/a0-a5 
のよう にして レジスタ を まとめて スタックに 待 
避 • 復^す るのに 使う 命令と してもう お馴染み 
だが， リス ト 4 の 23 行で は， 

movem. w(al), dO — d3 
と， いつもと は 少し 違う 使い方 をして いる。 

まず， ソ一ス オペランド は 見惯れ た" （sp) + " 
ではなく "（al)" で， しかも オペ ラン ド サイズ は 
ワード だ。 二の 命令の 意味す ると ころ は "al で 
ポイント される メモリ 以降の 4 ワード， （a0)， 
2 (aO) ， 4 (aO) ， 6 (aO) を 順 に d0〜d3 に 転送す る" 
だ。 "（al)+" のように ポスト インクリメント を 
指定して いる わけで はない ので， 命令 実行 後 も 
al の 値 は 変化し ない。 逆に， 

movem. w dO — d3, (a I ) 
な ら， a I 以降の 連続す るメ モ リ に dO. w〜d3. w が 
乾 送され る。 フラグの 変化 を 無視 すれば， これ 
は， 

move, w dO, (,al) 
move, w dl, 2ul ) 


move, w d2, 4 (a I) 

move, w d3, 6 (a I) 
と 同じ 働き をす る （move では ccr が 変化す るが， 
movem では ccr は 変わ ら な い）。 
ここで， もう一 度 

movem, w (al ), dO — d3 
に 話を屎 す。 これまでの 話から すると， この 命 
令 は， 

move, w \a\), dO 

move, w 2(al),dl 

move, w 4(al), d2 

move, w 6(al), d3 
と 同じ 動作 をす るよう に 思える だろう。 が， 実 
はちよ つと 違う。 正しく はこの あとに， 

ext. I dO 

ext.! dl 

ext. I d2 

ext. I d3 
をつ け 加えなければ ならない。 結果 は 無条件に 
ロング ワードに 符号 拡張され， データ レジスタ 
の 全 32 ビットが 彩鬌を 受ける の だ。 これ は 案外 
苜 点な ので 気をつける ようにしたい。 

あと， リスト 6 などで は 符号つ き 数の 比較 時 
に 使う bra の バリエ一 ショ ン がちら ほら 顔 を 出 
している。 「アセンブラ マニュアル j などで 働き 
を チェックし ておいて ほしい。 
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move, w dO, (aO) + 
は 1 ワードの 命令 だから， 

hline+ (512 — 描きたい ドット 数 ） x 2 
の アドレスから 实行 すれば， 希望 どおりの 長さの 線 
分 を 描く こ とがで き る。 サブルーチン 末の rts が 置か 
れた アドレス （仮に hlineO とすると） を 基点 と 考える 
と この 式 はも う 少し 簡単に 表せ， 

hlineO — 描きたい ドッ ト数 x 2 
と なる。 

リ ス ト 7 が ループ を 展開した gfill の 新しい 版 だ。 
リ ス 卜の 短 さは 意外 かも しれない。 展開した ループ 
の 中身 は ど こにいって しまった かとい う と， 45 行に 
凝縮され ている。 この. deb は 同じ 値の 定数が 並んだ 
プロ ッ クを 用意す る 疑似 命令で， 45 行で は 30C0 H と 
い う ワード データ を GNPIXEL 個 だけ 用意 している。 
ここで， 30C0„ は， 

move, w dO, (aO) + 
の マシン コードで あり， GNPIXEL は GCONST. H 
内で 定義 さ れた実 画面の 横 ド ッ ト 数 を 表す 記号 定数 
だ。 


実は gfill は, 

move, w dO, は0) + 
で 1 ドッ ト ずつ 点を打つ ft わ り に， 

move. 1 dO, は 0) + 
で 2 ドット まとめて 描く という アイデア によって さ 
ら に 高速 化で き る 。 ただ， 横 ド ッ ト 数が つ ね に 偶数 
と は 限らない から， 奇数の 場合 は 最初 か 最後の 1 ド 
ットを 特別扱い する 必要が 出て く る。 この 点に 注意 
し プログラムに してみ たら リスト 8 のよう になった。 
リ ス ト 7 からの 変更 部分に 注目 して 読んで みて ほし 


描画 モード を 加えよ ラ 


速度の 追求 はこの くらいに して， こんど は 機能の 
拡張に 目 を 向ける。 描 iWl モードが 使える よ うにす る 
の は 非常 に 簡単 だ。 move で G-RAM に 書き込ん でい 
る 部分 を or にす る だけで OR モードになる し， eor に 
す れば XOR モ ード になる。 パラメータ で 描画 モ 一 ド 
を 指定し 処理 を 振 り 分ける より は 直接 リスト 8 の 部 


り ス卜フ GFI1_1_2.S 
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• includ 

t gconst ， h 


2 
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.xdef 

gfill 




.xref 

gramadr 


5 
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.xref 

gfclip 




. offset 



e 

xe: 

.da.w 



10 

Y0: 

.da.w 



1 1 

XI： 

.ds.w 



12 

Yl: 

.da.w 



13 

COL: 

.ds.w 



14 

15 


.text 



16 


. even 



17 

ie 

gfill : 




19 

PARPTR 

= 8 



20 
21 
22 


link 
movem . 1 

dO-d3/aO-al >- ( sp) 


23 


move . 1 

PARPTR ( a6 ) ,al *al= 

パラメータ 受け 《 し fifl W 

24 

25 


movem . i、. 

(al ) ,dO-d3 *d0- 

S3 に ffi 擦 を 取り 出す 

26 


bsr 

gfclip 拿 ク i 

f ツビ ンゲ する 

27 


bmi 

done *N= 1 

なら 描豳 の必髮 なし 
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14 








15 


.text 






16 


. even 






17 








18 

gfill: 







19 

PARPTR 

= 8 






20 


link 

a6, #Q 





21 
22 


movem ■ 1 

d0-d3/aO-a2,-( 

ipl 




23 


move . 1 

PARPTR! a6 ) ,al 

*al= パ -, 

メ―タ 

せ け 

« し領 w 

24 
25 


movem .w 

(0 

*d0-d3 t 

座標 を 

取， り 

出 す 

26 


bsr 

tffclip 

* クリ' ：/ 

ビング， 

r る 


27 
28 


bmi 

done 

*N=1 な S 

描 隠の 

必 R 

な し 

29 
30 


bsr 

gramadr 

* 左上の 

j-RAM 上 

の ァ 

ドレス を 得る 

31 



de t d2 

ち 

'ク セル 



32 


sub. w 

dl ,d3 

*d3=« ヒ 

'ク セル 

«-i 



28 
29 


bsr 

gramadr 

* ± の G- RAM 上め ァ 

ドレス を ffl る 

30 
31 
32 
33 


sub . w 
sub , w 

d0,d2 
dl ,d3 

*d2= 槽 ピクセル 
*d3= ^ビ ク セ ル ft-1 


34 


move . w 

COLI al ) ,d0 

零 d0= バレ ヅ 卜コー ド 


35 
36 
37 
38 


lea.l 
addq , w 
add.w 

next ( pc ) ,al 
*1 ,d2 
d2 ,d2 

* 本文 參 ffi 


39 


suba. w 

d2,al 





move , u 
sub . w 

#GNBYTE,dl 
d2,dl 

*dl= ライン M の アト 

レスの 差 


loop ： 
next ： 

jrop 
.dcb.w 
adda, w 
dbra 

GNPIXE し， S30C0 
dl ,a0 
d3 , loop 

* move . w dO , i aO ) + 
» すぐ 下の ライ ンへ 
*d3 回 II り 返す 


50 
51 
52 
53 

done ： 

movem • 1 

unlk 

rts 

. end 

(3p)+,dO-d3/a0-! 
a6 

il 





U ス卜 8 

GFI しし 3.S 

33 
34 
35 
36 
37 


move , w 
swap . w 
move ' w 

COL(al ) ,d0 
d0 

COL(al ) ,d0 

*d0= ノ、' レヅ 卜コ一 卜 


38 
39 


lea.l 
addq .w 
bclr.l 
beq 
lea. 1 

next ( pc ) , a2 
#1 ,d2 
*0,d2 
skip 

oddf pc ) t a2 

*a2= 現り ァ ドレス 
* 橫ドッ ト » は 奇 « 
，珩 ぉト' ヅ ト のとき 

V ？ 


skip ： 

lea.l 
auba . w 

move . w 
add.w 
sub. w 

S E- 

*dl= ラ ィ ン M のァ ト 

レスの * 

50 
51 
52 
63 
54 
55 

loop: 
odd: 
nex t ： 


(al) 
d@, (a9) 
dl ,a0 
d3 , loop 

» 1 ライン 《IB 

* 奇 K ドク トの 場合 

* すぐ 下の ライ ンへ 

*d3 回 緣り 返す 


56 
57 
58 

done ： 

movem . 1 

unlk 

rts 

(ep)+,d0-d3/a0-i 
a6 

12 


59 
60 
61 
62 
63 
64 

hline ： 
hlineO: 

.dcb.w 
Jmp 

- end 

GNPIXEL/2,*20cO 
(a2) 

•move . 1 dO , { aO ) + 
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表 1 各種 描画 モードへの 対応 （変更 部分） 


OR モー ド 

52: odd: 

or w dO, (aO) 

* 奇数 ド ッ ト の 場合 


-. 

. deb. w GNPIXEL/2, $8198 

*or. 1 dO, (aO) + 

XOR モー ド 

52: odd: 

eor, W dO, (aO) 

* 奇数 ドッ 卜の 場合 


61: 

. deb. w GNPIXEL/2, $b!98 

* eor. 1 dO, (aO) + 

AND モ一 K 

52: odd: 

and. w dO, (aO) 

* 奇数 ドッ 卜の 場合 


61: 

. deb. w GNPIXEL/2, $cl98 

*andj dO, (aO) + 


分 部分 を 修正 して 別の サブルーチンに してし まった 

ほ う が 楽 だろ う。 という わ けで， OR, XOR, AND 各 
モードへの 変更 箇所 を 表 1 に まとめて おく。 表に は 
特に 示して いないが， サブルーチン 名 も gfilLor とか 
なんと 力'， それらし い 名前に 変更して おくと よい。 
そのと き は 同時に 3 行の 外部 定義 名 も 変える の を 忘 
れな いよ う に。 

これら gfill のバ リエ ーショ ンの 動作 試験 に は リ ス 
卜 5 を 改造 した もの を 使っても よい が, 先月の 
LINE. S を 流用して それぞれ 独立し た プログラムに 
し て おけば 便利 だろ う。 先月の リスト 4 の 7 行 を， 
PARCNT equ 5 
22 ~ 25 行の IOCS コール 呼 び' 出し 部分 を， 
一 （sp) 
—SUPER 
dO, (sp) 
giospar (pc) 

gfill_or * な ど な ど 

#4,sp 
—SUPER 
#4, sp 

さ ら に 5 行の 直後 あた り にで も， 
gfill— or * な ど な ど 

あ と は 個別に アセンブル 
チン と リ ンク すれば 出来 


に 

clr. 1 
DOS 
move. 1 
pea. 1 
bsr 

addq. 1 
DOS 
addq. 1 
のよう に 修正し 
. xref 

と 外部 参照 定義 を 加える 
したう えで 必要な サ プル 
上が り だ。 


おまけ は タイ リング ペイン 卜 


もう ひと つ だけ gfill の バリ エー シ ョ ンを 作つ て 今 
月 は 終わ り にしたい。 いわゆる タイ リ ング がで き る 
ようにして みる。 タイ リング は 異な も 色 を 交互に 並 
ベる こ とで 解像度 を ある 程度 犠牲に して 疑似 的に 多 
色 表示 を 行う 手段 だ。 65536 色が 同時に 出せる 
X68000 では 無用 といえば そう なの だが， 16 色 モー ド 
や 256 色 モー ド では ま だま だ 使い道 は あ ると 思う。 

あ ま り 複雑に はした く ない ので， 2 色の 市松 模様 
専用に 限定して 考えよう。 要は 2 色の 点 を 交互に 並 
ベて いけば よい わけ だ。 運よ く， リスト 8 の gfill では 
2 ドット を まと めて 書き込む ようになつ ている ので, 
dO. 1 の 上位 ワードと 下位 ワードに 2 色の パレ ッ トコ 
—ドを 入れて おけば 簡単に タイ リ ングが 実現で き る 
ことになる。 あと は 実際の コード を 見て もらつ た ほ 
うがよ くわ かるだろう。 で， リスト 9 だ。 

基本的に はリ スト 8 を ベースに 最小限の 修正 を 加 
え た 形 だ。 ここで も 変更 部分に 注目 し て 読んで みて 
も らいたい。 データ レジスタの 上位 ワードと 下位 ヮ 
一 ド を 交換す る swap 命令の 使 い 方が ポイント だ。 
各 swap 命令の 意味が つ か め れば， プ ログ ラム 全体の 
動作 も 見えて く るだろう。 
* 

え 一と， 『猫 ふん じ やった』 つて 曲が あるじ やな 
い？ ピアノ 教室に 嫌々 通って いる 子供で も なぜか 
あの 曲 だけ は 喜んで 弾く という あれ だ。 あの 曲 は 単 
純な 指 遣いながら 黒鍵 は 多用す るし， 手 を 交差 させ 
たり もなん かして， ピアノ を 弾いて いる 気分 を 味わ 
える という のが 人気の 秘密 だつ て 昔な にかで 読んだ 
記憶が ある。 いま， なんとなく 思い出した。 

さて， 次回 も グラフィック， 今回の 話の つづきに 
なる 模様 だ。 それで は， また 来月。 


リス 卜 9 TILEFIL し S 




. inc lude 

gconat .h 





36 


move , 丄 

COL1 (al ) ,d0 

*d0= ノく レ 'ソ ト 

コード 


2： 








37 


btBt . 1 

#0，dl 




3： 


. \de f 

gtilef ill 





38 


beq 

skips 




4: 


.xref 

gramadr 





39 


a 

d8 




5: 


.xref 

gfclip 





40 







6: 








41 

skip© ： 

lea.l 

next ( pc ) , a2 

*a2- 苠 り ァ 卜' 

レ ス 




.offset 

e 





AZ 


addq , w 

#1 ,d2 




8； 








43 


bclr, 1 

#0,d2 

* M ドツ 卜お （- 

t 奇 おか" 


9: 

X0: 

,da.w 






44 


beq 

skip 




10 

Y0: 

.ds.w 






45 
46 


lea.l 

odd { pc ) , a2 

* 竒 » ド ヅ ト 。 

) と さ 


11 

12 

XI： 
Y1 ： 

.da.w 
.ds.w 






47 

akip: 

lea . 1 

hlineO(pc) ,al 




13 

COL1 ： 

.ds.w 






48 


sub& , w 

d2 t al 




14 

COL2 ： 

.ds.w 






49 







15 








50 


move . w 

#GNBYTE,cll 

*dl= ライン W 

のァ ドレ 

スの » 



.text 






51 


add.w 

d2,d2 






. even 






52 
S3 


sub. w 

d2,dl 




18 
19 

Stilef ] 

11： 






54 

loop ： 

Jmp 

(al) 

* 1 ライン 描 S 

1 


20 

PARPTR 

= 8 






55 

odd: 

swap. w 

dO 

* 3f « [ドヴ トク 

)* 合 


21 


link 






56 


move . w 

dO, (aO) 




22 


movem . L 

d0-d3/aO-a2,-(sp) 





57 


swap . w 

dO 




23 








58 

next ： 

p. 

dl ,a0 

* すぐ 下の ラづ 

ン へ 


24 


move . I 

PARPTR (a6 ) ,al *a 

1= ハ' ラ 

メ 一 う 

？ 受け « し領城 


59 


BW&p . VI 

d0 




25 


movem . w 

{al ) ,d0-d3 *d 

0-d3 に 

座標 3 

！: 取り出す 


60 
61 


dbra 

d3 , loop 

*d3 回綠り 返 1 



26 
27 


bsr 

gfclip * -* 

，リ 'ヌ i 

； 1 ング 

す る 


62 

done ： 

movem. 丄 

(sp)+,d0-d3/a0-t 




26 


bmi 

done *N 

M なら 

描画 6 

：> 必要なし 


63 


unlk 

a6 




29 
30 


bsr 

gramadr * ； 

£ 上の G 

-RAM j 

二の ァ ドレス を 得る 


64 
65 


rta 





31 








66 

hline ： 






32 


sub. w 

dO t d2 拿 d 

2= 横ビ 

ク セ J 

レ 数- 1 


67 


.dcb.w 

GNPIXEL/2 , S20C0 

♦move . 1 d0 , ( 



33 


sub. w 

dl ,d3 *d 

ピ 

ク セ > 

レ»-1 


68 
69 

hline0 ： 

jmp 

(a2) 




34 
35 


eor . w 

dOtdl * 





70 


.end 
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1X68000 用 


八ン ディ イメージ スキャナ アダプタの 製作 


Hayashi Yohzow 


醫 'リ ぶ—" 
ポータブル ワープロの スキャナって， 結構 互換性が あるので す。 ここで は 安価 

で 手軽な ヮ 一プロ 用の 八ン ディ イメージ スキャナ を X680Q0 に接總 する ための 
アダプタ を 製作して みましょう。 当然の ことながら， これ を ドライブ する 専用 
の 読み取り ソフ卜 も あわせて 発表し ます。 




八ン ディ スキャナが ほしい 


突然です が， 世 問で はィメ • 
が 流行って ますね。 FAX ノ、 ン ディ コ ピー， 
ペン 型 翻訳 機なん ての も CCD" の 発達で 
小型化 された スキャナ （ライ ン センサ） の応 
用 製品です。 そしてなん といっても， ヮー 
プロ， パソコン といった 情報機器 は， その 
ほとんどが オプションと して イメージ スキ 
ャナを 持つ ようになりました。 某 386SX マ 
シンに は 標準で ィ ンタ フェイ スが ついて ま 
すね。 でも， その 用途 は， 大半 は 「文章に 
ちょっとした 写真 や カット を 入れる」 とい 
う ワープロの 機能 拡張 的な も のです 力 '：。 

さて， X68000 に 目 を 移しましょう。 ご 
存じの!： おり， X68000 に は CZ— 8NS1 とい 
う A4 を フル カラ 一で 読め る イメージ スキ 
ャナ があります。 力 5 , 高い。 白黒の ス キヤ 
ナは RS—232C タ イブの も のが 使え ま す 力 5 ， 
相対的 に 高価で， ドライバ ソフト もつ いて 
くるわけ ではありません。 よって， ス キヤ 
ナを 持って いる 人 は 当然 少数です （よね？）。 

しかも， いまの 時点で イメージ を 張り付 
けられる ワープロ はなく （無理 すれば でき 
ますが)， 当然 その 用途に 使う 人 もい ませ 
ん からさ らに スキャナ を 買う 人 は 少な く な 


• 


V え 
f ™ l り 


ります。 

し 力' し， しかしです。 X68000 は， 映像 
関係に 標準で 1 M バイ ト 以上と いう 某 一太 
郎 マシン + フレームバッファ 2) を も 凌駕す 
る RAM を 備えた， 映像 をゥ リ に し たパソ 
コン です。 安価な スキャナがない ため， ど 
れ だけの 人が その 機能 を 生かせな く て 泣い 
ている こと 力' （おおげさ）。 某 一太郎 マ シ 
ンには 専用の， 26 万 色 を わざわざ 8 色に 落 
とすと いう 超 無駄 オーバー スぺッ ク ハンデ 
イカ ラー スキャナが あると いうのに， なぜ 
X68000 に は 白黒の スキャナ さ えない の だ 
ああ。 シャープの 人に 聞いたら， X68000 
用に ハンディ スキャナ を 出す 予定 はない と 
のこと。 あっさり 夢 も 希望 も 打ち砕かれた 

と ころで， 本題に 入り ましょう。 

絲 お ！ 

I 投げ売り スキャナに 愛の 手 を 

という わけで， ない もの は 作って しまえ 
という フロンティアスピリット （ああ， こ 
れを 忘れた らパソ コンは マイ コンじ やなく 


一 


なる） に のっとって ハンディ スキャナ をな 
ん とかつ なげて みました。 というの は 建て 
前で， ほんと は 今年 初め， 秋 葉 原で ワープ 

口 用の スキャナ 力 ? 4，800 円で 投げ売り （に 
して は 高い かな あ） していた ので 衝動買い 
してつな げたので す。 インタフェイス を 超 
ケチッ て アダプタ 形式に したので， 完全 無 
欠と はいきません が， やはり 腐っても 鯛で 
すね （ひどい いい 方）。 X68000 ならではの 
美 し い 画像 は 他 機種の 追随 を 許 し ま せん。 
え ？ スキャナの 画像に 機種で 差が つ く も 
のかって ？ 

まあ コラム を ご覧く ださい。 

とにかく， IC3 個 という 小 さな セッ ト で 
すので， 本誌の ハードウェア 工作 入門の 
ちょっとした 応用 編と 考えて， ぜひ 作って 
みて く ださい。 

| あなた も わたし も OEM 

さて， 気になる 対応 スキャナで すが， ァ 

ルプス 電気の OEM" で （外から 見た だけ 


読み取り 画像の 情報量に ついて 


スキャナの 読み取り プログラム を 設計す る 場 
合， 問題になる のが 読み取る ドッ ト 数です。 一 
般 的な スキャナの 解像度 は 1 00D 画素 前後 （CCD 
の 解像度 は さらに 上） です が, 世間の ワープロ や 
パソコン は 画面の 解像度 がそん なにありません。 
実際に は 512 ドッ ト または 640 ドッ ト しか 読んで 
いないの です。 

私 は 今回 手に入れた ワープロ 用 スキャナの 説 
明鲁を 見て 思わず 笑って しまいました。 解像度 
を 400dpi にす ると 読み取り 幅 はたった 32mm にな 
つてし まう のです。 ノく ソコン でも 水平 540 ドッ 
ト 程度 じ や 今 主流の 105 画 を 読もう とすると 解 
像 度 を ほ 0dpi 以下に しなければ なり ません。 宝 
の 持ち腐れと は 正に この ことです。 

X68000 では そんな ことはありません。 実 画 
面 サイ ズ I024X 1024 ピクセルの 水平 型 VRAM と 
いう， まるで スキャナの 読み取り 用に 設計され 
たので はと 錯覚す る テキス ト 画面が 4 枚 も あり 
ます。 これ を 使えば 最大 1024X4096 ドットと い 
う 広範囲 を CRT で 確認 し ながら 読み込め るので 
す。 


今回 はさす がに そこまで はやり ませんで した 
が， CRT の アスペクト 比 （2 ： 3) に 合うよう に 
最大 I024X は 36 ドット を 読み取り， 縮小す ると 
きに 多 値 化して います。 つまり， 最高 6 倍の 
オーバ —サンプリング を 行い， 見かけの 解像度 

を 上げて いる わけです。 

ニニで ちょ つと 読み取 り 画像の 情報量に つい 
て 調べて みましょう。 n 色の 画像 | 画素 当たり 
の 情報量 は log 2 n (ビット） で 表され ますから， 
標準 的な， 640X400 ドット 白黒の 画像で は， 情 
報餐は 最大で， 640X400Xlog 2 2 = 250 K ビッ 
ト と な り ま す。 

では、 今回の プログラムで， 原画像 サイズ 10 
24X1536 ドッ トを 768X512 ドッ ト， 5 階 調に 変 
換 した 場合 はどう でし よ う 力、。 

768X5l2Xlog 2 5^89IK ビッ ト 
となり， 実に 3. 5 倍 以上の 情報量 を 持つ ことが 
わかります。 近くに ハンディ スキャナ のつな 
がって いる ヮ一 プロな り パソコンの ある 方 は， 
ぜひ 同じ 原稿で 見比ぺ てみ てくだ さい。 ス キヤ 
ナの 持つ 真の 実力に 驚かれる 二 とでしょう。 


石が 3 つの 簡単な 基板 だ 
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じ やわ かりま せんが）， コネクタが 8 ピン 
ミ 二 DIN(X68000 の キー ボー ドな どの コネ 
クタと 外見が 同一） の もの はまず つながる 
ので はない かと 思われます。 この 規格 はモ 
ノ クロの スキャナ では ほぼ 業界 標準と も い 
える ほど 普及して います。 文書の フ才一 
マットな ど ほ とん ど 互換性の ない ワープロ 
界で すが， こと スキャナの ことと なると， 
ほとんど の 機種に 互換性が あ り ま す。 

私が 購入した の は キャノンの キ ヤノ ヮ一 
ド a シ リ ーズ 用の CW— IM02 という もので 
すが， これ は ひと 昔 前， まだ 64 薩 幅の もの 
が 主流 だつ た頃ポ ピ ユラ 一 だつ た モデルで， 
いまでも バソコ ン 用で HAL 研， NEOS な ど 
の モデルに 採用され ています。 スペックと 
し て は， 64mm 幅， 400dpi" , 3 種類の 64 階 調 
ディ ザ リング 機能 を 待って います。 また 同 
じ インタフェイスで， ディ ザリ ング 機能の 
ない 廉価版 や, 最近 主流に なって き た 105 關 
幅の もの， カラー （3 度 読み） の もの， また 
ビデオ 画像 を 取り込む ビデオ スキャナ など 
も 各社から 発売され ている よ うです。 


とにかく 規格 


さて， スキャナが 手に入った ところで ィ 
ンタ フェイ スの 設計 を 始める わけです 力-:， 
その 前に スキャナ 側の 規格が わからない こ 

とに はお 話に なりません。 幸い， 友人が N 
図 1 スキャナ 側から 見た 信号 


EOS 製の PC- 9801 用 インタフェイス ボー 
ドを 持って いたので それで 調べる ことにし 

ま した。 

最近の ボー ドは カスタム IC が 載って い 
る 場合が 多く 見受けられ ますが， これ はす 
ベて ディスク リート （離散） 部品で できて 
お り ， 簡単に 動作が 理解で きました （結構 
タコな 部分 も あ り ま した カリ。 

図 1 に， 各 端子の 機能 を 示します。 では 
詳しく 説明し ましょう。 1 番は + 12V の電 
源です。 消費 電流 は 400mA く らい （ほ とん 
ど が 光源 用） 流れ ま すが もの' によって は （力 
ラーと か 自動 走査と かの もの は） 1A 近く 
流れる もの も あり ますので 注意が 必要です。 
2 番と 8 番はグ ラン ド， 0V です。 

3 番は主 走査 （横 方向の， CCD による 
スキャン） の 始まり を 立ち上がり （ロー か 
ら ハイになる） で 知らせます。 

4 番は 8 ドッ ト ごとに ローになる 信号で， 
メモリに 直結す る 場合， これで アドレス を 
カウン 卜します （親切 だな あ）。 

5 番は ド ット クロ ッ ク です。 立ち上が り 
のとき に 有効な 画像 データが 6 番 にあ り ま 
す。 周期 は 実測 値で 約 1.3 //秒でした （770 
kbps!)。 

7 番は 人が 手で 行 う 縦 方向の スキャンの 
同期信号で， 立ち 下がりで 新しい ラインに 
入った こと を 知らせます。 これらの 様子 を 
図 2 に 示します。 



ピン 番号 

信号 名 

I/O 

備 考 


-(- I2V 


電源 

2 

GND 

IN 


3 

SFT 

OUT 

主 走査 スター ト タイミング 

4 

AU 

OUT 

アドレス アップ 

5 

WR 

OUT 

データ 取り込み タイ ミ ング 

6 

VD 

OUT 

ビデオ データ （H 黒/し 白） 


丽 

OUT 

副 走査 同期 

8 

GND 




図 2 スキャナ 信号 タイミング チヤ一 卜 
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以上 を 見て もらえれば わかる とおり， デ 
ータは 完全に 一方的な 同期に よ る 垂れ流し 
です。 しかも 転送 速度 も 決して のんびりし 

た 速度で は あ りません。 PC- 9801 用の ィ 
ンタ フェイス では， 8MHz の 8086 を 想定し 
て， 16 ビット パラレルに 変換して 読み込ん 
でい ました 力 f , 諸々 の 処理 を 含める とそれ 
でも 余裕と はいえない ようでした。 そうな 
ると， X68000 でも 専用の イン タフ ヱ イス 
ボー ド を 作ら なきやなら ないよう な 気が し 
てきて， 実際 試作 してみ ました。 ジョイ ス 
ティ ック ポートの 利用 も 最初 考 え たのです 
力 * 「速度が 間に合いつ こない」 と 思い込ん 
でし まってい たのです。 

ところが ある 日， ふと ジョイスティック 
ポート を 利用した インタフェイス を， だめ 
もとで 作って みる 気になった のです。 いや, 
人間 諦め 力 5 ' 早い と 損します ね。 動く じ やな 
いです か。 シシリ アンの 設計者に 感謝！ 
という わけ で ボー ド はまった くの 無駄 に 
なって しまい ま したと さ。 


アダプタ 


0, ©, ③は， I ライン 分の データ， SNX と は 無関係に. 一定 間隔で 送られる。 


X68000 のジョ ィ スティック ポート は 正 
しく ATARI 規格です。 回路図な どの 文献 
を 見れば わかり ますが， 連続して 取り込め 
る ビッ ト は 4 ビッ ト しか あり ません。 今回 
のように パラレル （並列） ポートと して 使 
う 場合， これが ネックに なって きます。 X 
1 のように 8 ビッ 卜の 汎用 ポ一 ト なら 嬉し 
かった （？） のです が， ない 袖 は 振れません 
ので 4 ビッ トで 頑張る しか あ り ません。 

あと は， 1.3X4 = 5.2 バ 秒で 4 ビットと 
いう 速度に ソフト ゥヱァ が 追いつ く かどう 
力 1 ， です。 これが 可能で あると して， ァダ 

1) CCD 

電荷結合素子 のこと。 霄子を バケツ リレーの 
よ う に 運 ぷシフ ト レジスタの ことなので すが， 
光電 素子 と 組み合わ さ れて撮 像 素子に 応用 さ れ 
る 二と が 多い ので， 一般に CCD といえば 撮慷棄 
子 を 指す よ うにな リ ま した。 

2) フレームバッファ 
要するに 大 容量の G-RAM。 640 X400 ドッ 卜， 

1677 万 色 （24 ビット/ビクセル） というの が標 
準 的。 ACRTC を ffi み， 整数 倍の 拡大 や スムース 
スク ロール をハ一 ドでサ ポー 卜する ものが 多い。 

3) OEM 

相手 先 ブランド による 販売。 最近 大 流行 （だ 

そうだ)。 

4) dpi 

ドット/インチ。 I インチ （25.4mm) の 中に 
何 ドット あるか， という 分解能 を 表す 単位。 400 
dpis 16 r ッ ト /mm 


Oh! X 1990.9. 


プタ は， スキャナから シリアルに 送られて 

< る 画像 データ を 4 個ず つ まとめて 渡して 
やる と いう 作業 を すれば いいのです。 

し 力' し， データ は 垂れ流しで すから， こ 
のま まで は X68000 は 次の データが いっき 
ている のか わかりません。 そこで ここから 
は 次の 4 ビット， と 知らせる 信号 （同期 信 
号） が 必要です。 さらに 図 1 に 示し た と お 
り ， 凶悪な ことに "次の 1 ラ ィ ン 分の デ一 
タ= 次の ライン， と は 限らない" ので， 次 
の ライン を 知らせる 副 走査 信号 も 必要です, 
こ の 2 つの 信号 は 余つ た ト リ ガ ボタ ン用 
ビッ 卜で 渡します。 

| 実際の 回路 

以上の こと を ま とめた のが 図 3 の 回路で 
す。 簡単で しょ う。 以前の ボードで IC14 
個 の 規模 だ つたの が た つたの 3 個！ （単純 
に 比べられない 力り そう，. 私の ハード 製作 
の 信条 はいかに 安く して 最大の パフ ォ一 マ 
ンスを 得る 力'， です （単に 貧乏な だけと い 
う 話 も ある）。 

わかる 人 は 一瞬で わかる と 思います が， 
初心者の 方の た め に 一応 説明 します。 

まず 箱が 3 個あります ね。 それから なに 
やら" 三角形に 丸の ついた のが いっぱい あ り 
ます。 これらが 実は IC の ひとまと まりの 
機能 を 表して います。 

い ち ばん 上の 箱の 上に HC595 と 書いて 
あります 力 f ， これ は ひとつの IC で， HC595 
というの は IC の 型番です。 この IC は 8 ビ 
ットの シフト レ ジス タに 3 ステー ト 出力の 
ラッチが ついた ものです。 要するに， シリ 
アル— パラレル 変換 をす る 心臓部です。 8 
ビッ ト と い うの は 無駄な よ うです が ほかに 
適当な 石が ありま せんので。 その代わり， 
8. ビッ 卜の ポー ト にも 少し 手 を 加える だけ 
でつな がります。 箱の 内部に いろいろ 記号 
が 書いて あります 力 5 ', それが 各 端子の 機能 
です。 

詳しく は 規格 表 を 見て もらう ことにして, 
簡単に 説明し ますと， A というの が シリア 
ル 信号の 入力です。 ここに スキャナからの 
画像 信号 を 入れて や り ます。 SCK はシフ 

トク ロックの 咯で， ここ を 立ち上げ ると 内 
部で データが ひとつ シフトして， A 端子 か 

ら データが 取り込まれます。 SCK の 前に 
> が ついています 力す， これ は 信号の エッジ 
(変化 点） での 動作 を 表して います。 これ を 
スキャナの 読み込み タイ ミン グ 信号に つな 
いで やります。 LCK は ラッチ クロックで 
す。 これ を 立ち上げ ると， 初めて シフト レ 
ジス タの 内容が 出力で あ る QA~QB に 現 


れ ます。 そして 次に LCK を 入力す るまで 
変わりません （これ を ラッチ 二 掛けが ね 動 
作と いう）。 

それで は 次に， その 下の 1/2LS393 と 書 
かれた 2 つの 箱 を 見て みましょう。 これら 
は 2 つで 1 個の IC に 入って います。 その 
こ と を 明確 にす る た め に 1/2 と 先頭に つけ 
て あるので す。 LS393 が 型番です。 さて， 
この 箱 は 4 ビッ ト （16 進） の カウンタです。 
動作 は， CLR で カウンタの ク リア， A は 立 
ち 下がりで カウント アップ をし ます。 A の 
前の > はいいと して その さら に 前に 丸が つ 
いてます 力 5 ', これ は 負 論理 （ローで 有効） を 
表します。 つまり， 立ち 下がりが 有効な の 
です ね。 QA~QD は 出力です。 

図 3 スキャナ アダプタ 全 回路図 


上の LS393 は 分周 器の 役割 を 果たしてい 
ます。 スキャナの 読み込み クロック を 数え 
て， 4 クロック ごと に HC595 の ラッチ を 
動作 させて 出力 データ を 更新し， 新しい デ 
ータ である こと を ホスト （X68000) に 知 ら 
せて い ま す。 

まあ， こ れ はいいので すが 下の ほ う の LS 
393 は 変な こ と に 使って い ま す。 IC 数 節約 
のた め 強引に RS フ リップ フロ ッフ。 5) と し 
て 使って いるので す。 つまり， 副 走査 同期 

5) RS フ リ ッ プフ 口 ップ 

フリップフロップと は シ一ソ 一のこと。 入力 
によって この シーソー は どちら かに 倒れ， シー 
ソ一 は 次に なに かが 入力され る ま で その 状態 を 
保持す る。 概念的に はそんな 感じです。 
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信号が 立ち 下がって から 主 走査 スタート 信 
号が くるまでの あいだ， カウンタ をク リア 
(カウント アップ させない ように） している 
わけです。 

上の LS393 の QC に 抵抗と コンデンサが 
つながつ ています 力 5 , これ は HC595 のラ 
ツチ 動作 力 の 変化よ り も 幾分 遅れる た 
め， それに タイミング を あわせる ための 積 
分 遅延 器です （図 4 参照）。 ただし， これ は 
入力 ポー トがは で プル アップされ てい 
ると いう 前提で 設計して います。 ですから 
X68000 以外の 機種で は 変更す る 必要が あ 
るか もしれ ません （バッファが 足りな かつ 
たんです)。 

最後の IC は イン バー タ （論理 反転 器) で 
す。 ところどころ にある 三角形が そうです。 
これ は その 名のと おり， 正 論理 を 負 論理に， 
または その 反対に します。 負 論理の ほうに 
丸 をつ ける のが 常識です。 また， 回路の ィ 
ン ピー ダンス （抵抗 分の ような もの） を 下 
げたり する バッファ （緩衝器） としても 使 
われます。 合計 6 個の イン バー タが ひとつ 
の IC に 入って います。 

さて， いちばん 下に ゴ チヤ ゴ チヤした も 
のがあります が， これ は スキャナに 供給す 
る 電源 を 制御す る 回路です。 スキャナ は 基 
本 的に 長時間 連続 運転す るよ う に は 設計 さ 
れ ていません。 よって 必要な とき だけ 通電 
す る のです。 

し 力' し， ここ を チヤ チに 作る とひ どい 目 
にあいます。 スキャナ は 電源の 電圧 変動に 
敏感な ので 電源 は 十分 低ィ ン ピー ダン ス に 
してやる 必要が あるので す （私 はこれ で 2 
週間 悩み ま した）。 

図 4 アダプタ 内 タイミング チヤ 一 卜 


1 2 V 電源の こと 

スキャナ を 駆動す るのに DC (直流) 12 V 
の 電源が 必要です。 しかも 場合によって は 
1 A 程度の 容量が 必要になる かも しれ ませ 
ん。 そこ で， こ の 電源 を ど う やって 確保す 
るかが 問題です。 パソコン 用の スキャナで， 
初めから AC アダプタ がつ いてき た 場合 を 
除く と， 以下のような 方法が 考えられます。 

1) X68000 本体から 取る 

2) 1) と 同じ だが DC— DC コンバータ を 使う 

3) 市販の AC アダプタ を 使う 

4) 電源 を 作る 

1) はた と えば イメージ 入力 端子な どから 
出て いる +12V の 電源 を 使おう という もの 
です。 X68000 内部で は， 12V は ディスク 
ドライブと 空冷 ファンに 使われて います。 
今回 は， スキャナ 動作 中に ディスク ドライ 
ブが 作動す る こ と はあり 得ません ので, 0.4 
A 程度の スキャナなら なんとかな り そ うで 
す （保証の 限りで はない）。 

2) は ジョイ ス ティ ック 端子に きている + 
5V から +12V を 作ろうと いう， うまくす 
れ ばいちばん スマートな 方法です。 しかし 
比較的 大 容量な ため， コンバータ 自体が 大 
きくな りすぎ， また 高価です。 

3) はいち ばん 安直です が 確実 かつ 安全な 
方法な のでお すすめです （電流 容量 だけ は 
確かめて く ださい） , 4) は， 市販品 は 信用 
できない と いう パワーの ある 方でした らい 
ちばん 確実な 方法でしょう。 なんに せよ， 
自分に あった 方法に ト ラ ィ してみ るの がい 
ちばんです。 


'部品 動の 旅 

方針が 决ま つたと こ ろで 部品 を 集め ま し 
よ う。 部品 表 を 見て く ださい。 

まず 小物から。 抵抗 は 1/8W 型の もので 
十分です。 カラー コード s> を 覚えて おく と 
便利です よ。 あと 回路図に あ り ません が 各 I 
C に は 電源に パス コ ン と 呼ばれる 誤動作 防 
止 用の コンデンサ をつ ける 必要が あ り ます。 
容量 は 0.1 ガ F 程度なら 適当で 構い ま せん 
が, 高周波 特性の よい， セラミック コンデ 
ンサな ど を 選ぶ 必要が あ り ま す。 間違つ て 
も 電解 コ ンデ ンサは 使つ ちゃい け ま せん。 
抵抗 や コンデンサの 精度に ついては まった 
く 気にする 必要 は あ り ません。 

では 次に 半導体 を 見て みましょう。 まず 
トランジスタです。 2SC945 は 非常に ポピ 
ユラ 一な 石です ので どこへ 行っても 50 円す 
る ことはないでしょう。 また， 相当 品と し 
て 2SC1815 などが あります。 2SA683 も， 
最大 コレクタ 電流 （ Ic ) が— 1A 程度 取れ 
れば ほかの 石で も 構いません。 

親切 な 店です と， トランジスタ 1 種類 ご 
と に 定格 を 書いて ある ところが あ り ます。 
規格 表で 調べて も 石の 値段 はわ かり ません 
ので （雑誌の 広告 を 見る という 手 も ある 
力 5 '), 実際に 店に 行って， 手持ちの ス キヤ 
ナの 定格と を 比較して， 余裕の ある もの を 
探す とよいで しょう。 おっと， あまり 大き 
いと， ケースに 入らない かもしれ ません よ。 

さていよ いよ IC です。 IC の 型番の 頭に 74 
がつ いています 力 5 ', これ は TTLIC" の 74 
シリーズ （または 相当 品） である こと を 表 
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します。 LS は ロー パワー ショ ッ 卜 キー バ 
リアと いう 回路 形式 を 表して います。 LS 
の 2 個の TTL はす ぐ 手に入る でしよ う。 
問題 は， HC595 です。 HC は ハイスピード 
CMOS 8 ) の 略で， 実は TTL の 皮 を かぶつ 
た CMOS なのです。 CMOS の 弱 点 で あ る 
スピード を LSTTL 相当にまで 改善し， 超 
低消费 電力 を 実現 し た シ リ ーズ です。 

こ こで なぜ わざわざ HC シ リ ーズを 使つ 
たかと いうと， 実は 595 の LSTTL 版 は， 
ひとつの メーカーから しか 出て いないので 
手に入れに く いからです。 ただ それだけで 
す。 でも HC は 入力が CMOS インタ フェイ 
ス な ので， 本来 は TTL と 混在 させる の は 
好ましくありません （入力 を プル アップす 
る 必要が ある— 余計な 電気 を 食う）。 しか 
し 私の システム では 一応 正常に 動く ので そ 
のま まにして あります。 お金に 余裕の ある 
方 は ほかの 2 個の TTL も HC に 統一して も 
よ いでし よ う。 

初心者の 方 は， 必ず IC ソケ ッ ト を 使い 
ましょう。 マルチ コンタクトの 高級品に な 
る と 値段が 平気で IC 自体の 何 倍 も します 
が， ま あ 慣れる ま では 世話に な つ た ほ う が 
よいと 思います。 

次に コネクタ 類です 。 絶対必要 なの はミ 
二 DIN (8 ピン） の ジャックと， D-SUB コ 
ネ クタ （9 ピン） の メスです。 あと は 電源の 
ジャック を， 手持ちの AC アダプタの プラ 

または 好みに あわせて 購入し ま しょう。 

次 は 基板です。 ユニバーサル 基板 という 
図 5 IC ビン 接続/有 極性 部品 


穴が 一面に 開けて ある 基板 を 使います。 も 
ち ろん 知識の ある 方なら プリ ン ト 基板 を 作 
つても よいでしょう （大量生産で きる！？）。 
大きさ は， 手のひら くらいの もの を 買って 
きて， あとで 切断す るの がよ いと 思います。 
最後に 重要な のが ケースです。 最近で は 
小さ な ケースで も 沢山 バ リエ ーショ ンがぁ 
ります ので， センスの 見せ どころ です。 ま 
た， ケースに 基板 を 固定す る ビスと ナツ 卜， 
ス ぺーサ 一な ど も 適当な もの を 選んで くだ 

さ い。 

部品が 揃い ましたら， あと は線材 （ ラ ッ 
ビング ワイヤー 9) が 適当） な り 半田 な り の 
消耗品 も 確認 しましょう。 家に 帰って か ら 
「切れて る 一」 なんて ことのな いように。 

1ェ 具につ いて 

製作に 最低 必要な 工具 は， 本誌の ハード 
ウェア 工作 入門で 紹介され ています ので そ 
ち ら を 参照 し て く ださ い。 ただ， 今回の よ 
う に 外付け のセ ッ ト では ケース を 加工す る 
ことになります。 耐久性 を 無視す るの なら 
裸で もい いです けどね。 プラ スティックの 
ケースなら 半田 ごてで 強引に 穴を開ける と 
いう 無謀な 方法 も 考えられます 力 { , やはり 
専用の 工具 を 揃え た ほ う が 当然 綺邇 にいき 
ます。 

ま ず 穴 開け。 ハ ンド ドリ ルで 十分です。 

ド リ ルチ ッ プは 3. 2隱 前後の も のが あ れば 
とりあえ ず 大丈夫で すが， こ の際セ ッ ト を 
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揃えて おく 手 もあります。 次に， 穴 をぐ り 
ぐり 広げる リーマ一 も 必需品です。 取っ手 
のつ いた ものが 便利です。 また， アルミ シ 
ャ一シ を 加工す るので したら ハン ドニ ブラ 

― (かじる！？ 道具） も ほしくな ります。 


半田 付けの J1A 


部品 と 工具 さえ 揃えば もう 半分 完成 し た 
も 同然です。 嬉々 と して 部品 配置 を 考え ま 
す （はたから 見たら 変態だろう な あ）。 部 

品 配置と 配線の一 例 を 図 6 に 示します。 私 

6) カラ一 コード 

抵抗 や一 部の コンデンサ などの 值を 示す のに 
使われる， 数字 を 色で 表す コードです。 色と 数 
字の 対応 は， 

5 
6 


黄… 4 白 … 9 
いろいろな 語呂合わせが あります が， 色の 傾 
番は， r 色相の 增加 する 方向で， 最初 は 明度が 
上がり， 最後に 飽和 度が 上がる j と 覚える とよ 
いでしょう。 抵抗の 場合， 値 表示 は 4 〜 5 本の 
色 帯から なり， 普通の 力一 ポン 抵抗の 場合， 
第 I 色 帯 …第 I 数字 
第 2 色 帯 …第 2 数字 
第 3 色 帯 …乗数 =10 の 第 3 数字 乗 
第 4 色 帯 …許容 差 （無色， 銀， 金と グレ 
― ドが 上がる） 

となって います。 

たとえば 「橙 白 赤金」 となって いれば， 抵抗 
値 は， 39X10 の 2 乗， つまり 3.9kfl です。 最後 
の 金色 は I 呉 差の 許容 储で， 土 5 % を 保証す る と 
いう ことです。 

ちなみに コンデンサの 値です が， 数字が 直接 
プリントして ある 場合が 多いです が， いろいろ 
な 表し 方が あるので 混乱 しないよ うにして く だ 

• 0.1〃 F などと その ま ま 害いて ある。 

• 4n7 など， nF の 位置に" n" が 入って いる。 

• 3 桁の 数字 … 埤抗の 色 帯に 同 じで 仮数 2 桁に 
乗数の かたち。 pF 単位。 

• 2 桁の 数字… pF 単位 そのまま。 

たとえば 4n 7 なら 4.7nF=0.0047//F, 221 なら 
220pF です。 

7) TTL 

トランジスタ • トランジスタ • ロジック の 略。 
つまり は トランジスタ （こ 二で は 狭義の パイ ポ 
—ラト ラン ジス タ） を 集 « しました よと いう 意 
味。 もっとも 広く 使われる 論理に です。 

8) CMOS 

相補 型 '金属 一酸化 膜 一半 導体の 略。 シーモ 
スと统 む。 P 型と N 型 両方の MOS 電界 効果 トラ 
ン ジス 夕 を 組み合わせて 論理回路 を 構成して い 
ます。 非常に 消 * 電力が 少ない のが 特徴。 

9) ラ ッ ビング ワイヤ一 

配線 方法の ひと つに ラッピング という 方法が 
あります。 長 一い 足に 細い ワイヤー を 専用の 治 
具で 卷き 付けて 配線す るので すが， それに 使わ 
れる 線材が ラッピング ワイヤ一 です。 ものが も 
の だけに あまり 少量で は 売って はいません が， 
I 巻き S えば一 生 モノ （？） です。 
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の 趣味で 高密度 実装に 走つ てい ま すので あ 
ま り 参考に はならない と 思います 力 5 。 
抵抗な どの 数値 は 書き込んで いません が 
回路図 と 見比べれ ばす ぐ わかる でしよう。 
不親切な ようです が， 信号の 流れ を 理解し 
ていた だき たいので す。 細かい 配線 は 初心 
者の 方に は少々 きつい かもしれ ません。 し 
かしい ま こ そ 日本 入の 本領 を 発揮す る と き 
です。 顕微鏡 下で 半田 付けす る プロの 方に 
比べたら …… 。 

図 6 の 配線 例です が， 電源 ジャックの 正 
負 力 5 , 市販の AC アダプタ では 逆にな つて 
いるものが 多い ようです （よく 考えれば 当 
たり 前 だね）。 注意して ください。 

近頃の 部品 は 自 動 工程に 対応す る ため 非 
常に 丈夫です。 よほどの こと をし ない 限り 
はまず 壊れません ので， 落ち着いて 余裕 を 
持って 作業して ください。 怪我 をしたら 元 
も 子 も あ り ません から。 

誠の 暁 

でき ま した か？ 

ま さ 力' いきな り ケースにまで 組み込ん じ 
やった 人 はいないで しょうね。 まず は 裸で 
動作 を 確認 します。 IC を ソケット に 挿す 
前に も う 一度 配線 を チヱ ッ ク してく ださい。 
テスタ一 をお 待ちなら， まず 抵抗 レンジで 
電源の 絶緣を 確かめます （かとい つて 絶緣 
計なん か 持ち出し ちゃ あだめで すよ）。 一 
瞬， パスコ ンに 充電 電流が 流れて， その後 
抵抗が ^ になれば 合格です。 では そのまま， 
電源を入れた X68000 につないで みま しょ 
図 6 部品 配置 例 



う。 各 IC の 電源 ピンに， '正し 〈5V がか か 
つてい るか どうか を 確かめて ください。 大 
丈夫なら IC を 装着し ましょう。 くれ ぐれ 
も 方向 を 間違えな いよ う に。 


動かして みるの だ 


一刻も早く 動かして みたいで すね。 でも 
デバ ッ ガで ポー ト を 眺め ていても 絵が 見 え 
て くるわけ ではありません。 ソフト を 用意 
す る 必要が あ ります。 リスト 1 に スキャナ 
の ドライ パプ 口 グラ ムを X-BASIC の 外部 
関数の かたちで 作って みま した。 と り あえ 
ず こ れ だけで 絵が 取 り 込めます。 scan( ) 
で スキャナーから テキス ト 画面に 画像 を 読 
み 込み， ttog( ) で 画面 モードに あわせて 
画像 を グラフ ィ ック 画面に 転送し ます。 詳 
しく は リス ト 中の 説明 を ご^く ださい。 

プログラムの 説明 は 割愛し ます。 複雑な 
こ と はして いません ので …… 。 時間と 戦つ 
ている さま を 笑って やってく ださい。 なお, 
コンパ ィ ラ または アセンブラから これらの 
外部 関数 を 使 うこと がで きます （ちょっと 
効率 悪いです が)。 その 場合 は， オブジェ 
ク トフ アイ ノレ （SCANNER. 0 な ど） を リン 
ク してく ださ い。 外部 関数の X-BASIC へ 
の 組み込み 方 は 皆さん ご存じです よね？ 

ここで 注意 を ひとつ。 この 読み取り プロ 
グラム は， スーパーバイザ モードで すべて 
の 割り込み を 禁止して， 最高 速で 突っ走る 
という マルチ タスク 破壊 プログラム になつ 
ています。 ですから 暴走が 怖い 人で Hum 


an68k の パージ ヨン 2 をお 使いの 方 は， C 
ONFIG.SYS で PROCESS をす 旨定 し な い 
でく ださい。 もしな にかあった とき は， ィ 
ン タラ ブト スィッチ を 押して 止める しかな 
いのです。 

では 再び アダプタ をつな ぎましょう。 リ 
スト 2 の テスト プログラム を 走らせて みま 
す。 スキャナの 読み取り ボタン を 押しな が 
ら 動かして ください。 うまくいけば 64minX 
96 漏の 範囲が 読み込まれる はずです。 いか 
がです か ？ 

ハングし てし まったら 速やかに アダプタ 
を 抜き， もう 一度 配線な り プログラム なり 
を チェ ック してく ださ い。 

う ま く 動いた ときの 感動 は ハード 工作な 
ら ではの ものです。 綺麗に ケースに 入れて 
本当の 完成です。 おめでと う。 

io) bask; の 外部 関数 を 作る のに は アセンブラ 
と リンカが 必要です。 福袋 か c コンパイラ を購 
入して く ださい。 

手順と して は. ソースファイル を アセンブル' 
リンクして. x ファイル を 作り， この 拡張 子 を 

.FNC に リ ネーム して BASIC.X の ある ディ レク 
トリに コピーし ます。 そして エディ 夕で BASIC. 
CNF に， 

FUNC= ファイル 名 
の I 行 を 追加して 終わりです。 SCANNER.S の壜 
合です と， たとえば， 
ED SCANNER'S 

(プログラム を 打ち込む） 
AS SCANNER 
LK SCANNER 

COPY SCANNER.X ¥ BASIC2 ¥*.FNC 
ED VBASIC2 ¥ BASIC.CNF 
( FUNC = SCA 匿 R を 追 カロ） 
と な り ま す。 
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, ちょっと 実用 プログラム 

さて， こ れ だけで は 物 足 り ま せんので， 
評価 用の 簡単な ユー ティ リ ティ を 作って み 

ました （リスト 3)。 新たに リスト 4 の 外 
部 関数 '°> が 必要です。 できれば 皆さんに 
使って いただき たいと 思い ま したので， こ 
れも BASIC です。 し 力' し X— BASIC つて 
強力です ね （ト 口い けど）。 

それで は 使い方 を 説明し ます。 操作 は マ 
ウス か キーボードで 行います。 マウスの 上 
下， または' カーソル キーの T 丄 で 選択， 左 
クリック ま たは リ ターン か スペース キーで 
実行， 右 クリック また は ESC キーで 取 り 
消しです。 

プログラム を 走らせる と， いきなり 画面 
を 真っ白に 塗ります。 実は， 読み取り 画像 
のバ ソファに テキス ト 画面の 2 , 3 プレー 
ンを 使って いて， この エリア は "終了" で 
"原画 消去" を 実行す るまで 消えません。 
よってな に か 不都合が 起 きて プログラム が 
中断しても 原画 は 生きて いますので 再 実行 
する と 表示され る ように して あるので す。 
次に， 画面 左上に メニューが 現れます。 そ 
れ ぞれの 機能 は 見れば だ いたい 想像が つ く 
と 思います 力 5 ， 一応 順に 説明し ます。 

"画面 モード" は， 画面 モード を 変更し 
ます。 512X512 ドット モード を 選ぶ と 16 色 
力' 65536 色 かと 聞かれ ますが， 描画す るモ 
ードを 変更す る だけで， 表示され る ィメー 
ジは 同じです。 

"取り込み" は， スキャナからの 取り込 
み を 実行し ます。 ずらっと 出て くる 数字 は, 
左から 解像度， 原稿の 範囲， 読み取る 方向 
を 表します （64 醒幅， 200/400dpi のス 
キヤ ナを 想定して いますので， 違う 規格の 
スキャナ をお 使いの 方 は 適当に 変更して く 
ださい）。 読み取り 速度に は 限界が ありま 
すので， あまり 速く スキャン しないで くだ 
さい。 

コラムに も あると おり， 原稿 サイ ズ と 画 
面 モー ド によって は オーバ一 サン プリ ング 
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による 画像の 多 階 調 化 を 行って います。 し 
かし， 用途に よって は 完全な 白黒の 画像が 
必要な とき もあります。 そんな 場合， 画像 
の 中間色に， あるし きい 値 を 設けて 白と 黒 

の 2 値 画像に する のが "2 値 化" です。 画 
像 を 見ながら 適当な し き い 値 を 決めて く だ 
さ い。 

"保存'" は 画像 を ファイル に 保存 します。 
フ アイ ル 形式 はお そ ら く X68000 の 標準 的 
な 形式であろう と 思われる 3 種類 をサ ポー 

ト しま した。 ".GS0" は img 一 save( ) の 
512X512, 16 色 モードです。 このと き パレ 
ッ ト を 保存す る パレット ファイル （パレ ッ 

ト コード 力' :16 個 入って いる だけです カリ を 
一緒に 作 ります 力 ? ， この フ アイ ルの 拡張 子 
は ミ ユー ジ カルプ ランの ペイ ント ソフトで 
ある 「マジック パ レツ ト」 で 使われて いる 
形式 （. PLS ) としました。 もちろん 2 値 
化して ある 場合に はパ レツ ト ファイル は 作 

り ません。 

". PIC " は ご存じ PIC.R によ る ファイル 
形式です。 こ こで は 全 画面 モー ド 対応の A 
PIC.R を チャイルド プロセス で 呼び 出 し 
て 使って いますので， APIC.R が カレント 
パス 上に なければ なりません （つまり， 環 
境 変数 PATH の ディ レクト リ 内の どこか 
に APIC.R を 持って くる 必要が ある）。 A 
PIC.R は 電波 新聞社の ゲーム ソ フ ト 「バ 
ブル ボブ ル」 にも 入って いますから， お 持 
ちの 方 も 多い ので はない かと 思います 力 ％ 
も ち ろん プログラム を 少し 変更す る こ と に 
よ つて 普通の PIC.R を 使う こと もで きま 
す。 思い切って 本誌 6 月 号の PIC.FNC を 
使っても よいでしょう。 

最後に ".CUT" は PDS の ペイ ン ト ソ 
フ ト であ る 「モノ トーン」 のフ アイ ル です。 
画面 モー ド 768x512 で， 2 値 化 し た 画像の 
うち， 680 x 480 ド ッ 卜 が 対象 になります。 
このと きの 範囲 指定 は マウスで も カーソル 
キーで もで きます 力- : ， 標準の システム では 
マウスの 鈍 さが 目立って し ま い 操作 がよ 
く あ り ません。 勝手ながら 電脳 倶楽部に 掲 
載され た^ OUSE.X (マウス 高速 化ュ一 
リスト 1 



スキャナ 用 サンプル 


ティリ ティ） との 併用 をお すすめし ます。 
以上 3 つの 形式で 保存す る こ と がで き ま 
す が これら の 形式 以外で も， チャイルド プ 
口 セスを 用いれば 简 単にお 手持ちの ほかの 
グラフ ィ ックフ アイ ラーに 対応させる こ と 
がで きる でしよ う。 

"終了" は， プログラム を 終了し ます。 
このと き "原画 保存" を 選択す ると， テキ 
ス ト 画面の バ ッフ ァをク リアし ません。 

残念な がら カラー スキャナに は 対応 し て 
いません。 （5,000 円で 売って た 力 ラース 
キヤ ナ があった の に …… 後悔 先 に 立 た 
ず。） 自走 式な ら ただ 3 回読めば いいはず 
ですから， 簡単に 対応で き ます。 

| また^ # 野望に 近づいた 

そ ん な こ ん な で， 永年の 夢ハ ン デ イス キ 
ャナ アダプタが 完成し ま した。 Z'sSTAFF 
で へらへら 女の子の 絵 を 描く もよ し， 文字 
認識に 挑戦して ダン プリ ス ト を 読み込ませ 
る もよ し， 自由に 応 JT-1 してやって 〈ださい。 

文中， 一般 受けし ない 専門用語 がた く さ 
ん出 てきた こと をお 詫びし ます。 しかし， 
そんな 言葉 はわから な く て 普通です から 気 
にしないで ください。 與味 さえ あれば その 
うち 'おえます。 おっと， も し 貴方が 工学 系 
の 学生な ら こんな 甘え は 許されません 力 f 。 

^後に な り ま したが， ハードの 動作 確認 
に 快 く 協力 し て く ださ つ た 恒吉宏 治 氏， 佐 
久間繁 夫 氏， 並びに 中 村隆生 氏に， この 場 
をお 借り してお 礼 申し あげます。 



(void) scan ( port , plane , column , 1 ine ； int) 


ハンディー スキャナーから テキス 卜 画面に 
B« データ を 取り込みます。 


port 

plane ： 

column: 
line ： 


ティ' ソク ポート 

プレーン 番号 

ィ 卜お U 〜： 128> 
イン 数 （1〜<10 96 > 


1112222222222333。 


ト バラ 

J ス 3 向 向 

- キ i 方方 

-テ o X Y 
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scan_param 

spower^param 

ttog_param 

exe table 


int— val , int_val , int_val, int—vai , 
i'nt_val , int_val ， voicf— ret 
int_val , int— val ,ary し i ,void-_ ret 


scan 
spower 


.text 
, even 


X-BASIC ェ ン トリ 


move . 
move.: 
move. 


12(sp) ,d0 
22(sp),dl 
32(sp),d2 
42(3p) ,d3 
d0-d3 

—scan 

4*4f sp) , sp 


I K プ 


movem* 
move . 1 


dl-d7/a0-a3 
8U61 ,dO-dl 


* 引 K 取 


awap.w 
lea 
adda. 1 
movea . 
move. J 
subq.w 
move.b 
move.b 
move.b 


a_newline 


moveq . 
moveq. 


s 一 coUimnscan 

move. 


move, 
subq. 


s_eloop2 


move . b 

and.b 

beq 


TORAN'al 

dl.al 

al t a2 

20(a6) ,d7 

#l,d7 

*4,d4 

«S20,d5 

#SC0,d6 

-tap) 

—SUPER 

dfl.SSPBUF 

*$O70O,sr 

a3 t d0 

dO.PPIC 

2@(a6),d3 

*513,d3 

d7,d3 

s_columnscan 
#8 t dl 
#0,d2 
SCROLL 


s_el.oop2 


*d5=SNX ほ号チ 
*d6=SRBfg 号 チ ， 


卜 （定 ft ) 
ク用 （定 K 
ク用 （定 ft 


* ス―れ • ィ 《r_ モーに に f$ 行 
*W り 込み 禁止 

* 画面の 一番 下まで 来た 


*d2= デ一ク マスク 用定 お 
*d3= 水平 バイト » 


s.akipll 


ち 上: 


【 3 二 ブル 弒 み 飛ばす 


s_akipl2 


bcc 


8_akipl3 


s— ski pi] 


s— ski pi 2 


. include 
• include 
. include 


IOCSCALL.MAC 
D06CALL.MAC 


.globl 
.globl 
.globl 

聿事 * 窜聿 ** 

PUSH 


_acan 

—spower 

_ttog 

定義 ** 


macro 
movem.l 


REG— LIST 
REG_LIST,-(sp) 


macro 

movem.l 

endm 


ム ボ' 


GVRAM 
GVLBH 
GVLBL 
T0RAM 


(sp)+,REG LIST 


SC00000 
SCI" 下 800 
3C7FC00 
3E00000 


PPIA 


SE9AO01 
SE9A005 


*8255 ポ . 


M 走査 J 
圈 f» デ 


= |1|SRB|SN'X|1|D3|D2|D1|D0| 

トロー ブ （昀 ェ' ッジ） 

ン コーダ 一同 期 ほ 号 <8ェ' 

タ （ 0 白 Z 1 黑， D3 が 先 ^ 


拿: (1 韋 jc 


it_adr 
n adr 


system_adr 
break— adr 
input— adr 
reserve 1 
reaer\'e2 
token_adr 
paran)_adr 
exe_adr 
reser\'e 


return 

return 

return 

return 

return 

return 

return 

return 

token_ table 

param_ table 

e\e table 


token_table 


scan ,\) 
"spower" 


pa ram_ table 


scan_para/ii 
spower j»ran 
ttog_pftrani 


► つ 越しご^'》 さまです。 それと， う ちの 学校に はなん と 0J いている MZ-8OK/2OOO/22O0 
Oh! X 1990.9. が A わせて 40 台 ほどあって， いまでも 投 業で 使って ますよ。 林崇洋 (20) 石川県 


SPOWER 


T T O G 


[void) ttog ( plane , mode ， grayscale ； irit ) 

plane ： テキスト プレーン 番号 

0-2 t 3 ) 
mode : 送 モード （以下お 照） 
grayscale ： 表示 色 を 指定す る 
i n t 型 配列 名 


I void ) spower (port, power ； int.) 


'イツ ク ストローブ ほ 号 を） 
>«游 を 制御し ます。 


モード： 転送 サイズ ： 

0 ： x768*y512 to x512*y512 ： 4 

1 ： xl024*y512 to xl024*y512 ： 2 

2 ： xl024*yl536 to y512*x512 ： 7 

3 : xl024*y!536 to y5l2*x768 : 5 


4 5 6789012345678901234567890123456789012345678901234567890123456789O1234567890M123456789019^^^^^^^^^^-^V-^^^^^W 

333333444444444455555555556666666666777777777788B88888889999999999 00000000001rl1^1^11wl22^^^^^^^^^^^^^^^^^K rt-T 



る 画し 

き 。定 

で ん担 

定 。せ を 

指す ま储 

をで いな 

号〗 切て 。 

番 e 一 えい 

ン， t は考さ 


r g 一 

面ォ n 

画ぞト 

クれ ソ 

ッそレ 

ィ は.、 

フ拥る 

ラ 間れ 

グ中さ 

を各定 一 o クく下 

面 指 レドッ よて 

隠。 で 。ブー ェ をし 

ト す^す トモ チ 等に 

スま ~ まス送 一 ドぅ 

キし s りキ te ラ 一 よ 

テ送. J なテは ェモぃ 

転お に の 面な 


0 

中 隨階階 階 


B—loopl 


s ー丄 oop2 


cmp.b 
bcc 


s_skipl3 


s— loopl 


s_loop2 


128(a2),a2 
a2,al 

d7,s— new 丄 ine 


実行時 M (お s ) 
* I 

上位 二 プル 取り込， 


(ToUl>=3.4) 

下位 二 ブル 取り込 ： 


バイ ト 書き込： 

(Total>=4.6) 


moveq , 
moveq. 
moveq. 


dO.PPIC 'MMO F F 

#Sf8ff,sr » 割り込み^ 可 

SSPBUF.(sp) * ユーザー モー ドぼ' ほ 

—SUPER 
4 { sp ) , sp 

#8,dl *HOME 位！ BM1 帰 


—SCROLL 
dl-d7/a0-a3 


move . 丄 
move.l 


12{sp) ,d 
22(sp),d 
dO-dl 


moveq. 1 


_spower 
4*2(sp} ,sp 


dl-d2 
-(sp) 
—SUPER 

8(a6) ,dl-d2 


韋ス -ゥ" Tf サ * _ モート- 


beq 


P 一 off 
p_return 


p 一 off 

dl , PPIC 
p— return 

dl 

dl.PPIC 

dO, (sp) 
_SUPER 
4 (spj ,sp 
dl-d2 


ISO N 
:«0 F 


X - BASIC ェ ン ト 


move, 
move , 
move . 


12{sp) t d0 
22(sp),dl 
32(sp) ,d2 


• 配 列 楚素先 35 


•U3(sp},3p 


>大1？ さんの あぶな t 

んの顚 が 降って く る 
せし ます。 


' ス J 


ムス j にん H)t して， 
'うの はどうで しょ \ 


'ろい ろな 表情 をした （で） さ 
絵 は 皆さんの ご 想像に おまか 
清水 健 年 （19) 東京都 
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add.w 

dl.dl *dl=dl*2 



move • b 

0(a2,dl.w|,d2 *d2= 1 ト' 

プ卜 g 

« 度 

asl.b 

*2,d2 »d2=d2 拿 •！ 



roove.w 

2(a5,d2.w),(al)+ * 配 列 力 

ら色も 

得て 

roove.b 
asl.b 

I(a2,dl.w),d2 » 以 下 2 
*2 r d2 

ト 'サ卜 


move.w 

2(a5,d2.w) , (al)+ 



dbra 

d5,t0_dotloop 



dbra 

d6 ， t0— column loop 



lea.l 

32(a0) ,a0 聿次 ライ 

ンのァ 

ト' レ 

dbra 

d7,t0_newline 




—model 

move 
clr.t 


move 

tl .loop 

move 
rol. 

1 

move 

tl_dotloop 

rol. 


move 
and.v 

b 

move 
dbra 


dbra 



M0DE1, 1024*512 to 1024*512,2colors 
#32*512-1 ,d7 *d7= 力 ゥン ター 


(a0)+,d0 

#2 f d0 

»32-l,d6 


d6,tl_dotloop 
d7,tl— loop 


！ト' リ ト 打- 


M0DE2, 1021*1536 to 511!»512,7colors 


VTABLE3,a2 

GVLBL,a3 »a3= グ ラフィック 左— 


movea . 
movea.i 
moveq.. 
move.w 


t2_newline 


»a4=〃 Y 方 l 



dl-d7/a0-a5 
8(a6),d0/d2/a5 


T0RAM,a0 

d0,a0 

GVRAM.al 


韋 a0= テキス 
*al= グ ラ フ 
*a2= 処 理 ル 

*020 な ら こ 


TT0GT.-\BLE(pc,d2. 


—SUPER 
d0,SSPBUF 

(a2) 

SSPBUF,tsp) 
—SUPER 
4{sp) ,sp 

dl-d7/a0-a3 


ド ごとの 処理' 


* 逆 アセ^ [かせ 

_mode0 
—model 
_mode2 
mode3 

MODEG, 768*512 to 512»511i,4colors 


*512-l,d7 


#32-1 ,d6 


(aO)+,dU 

*8,d0 

(a0)+,d0 


»a2= 明度 テープ， 
*d7= ライン カウ： 


*d0 か ら 3 ビツ ト 取り出 LcM' 


move.' 


move.w 
t0_colimnloop 

moveq. 
move . b 


move . I 
move . i 


move.w 

t0 dot loop 

moveq. 


movem.l 
andi .w 


move. 

Jar 

move. 


TTOGTABLE 

modeOadd 

modeladd 

mode2add 

modeScudd 


67890123456793012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012 

14415555555555666666666677777777778888888888999999999900000000 & 01111111111222222222233333333334444444444555 

22222222222222222222222222222222222222222222222222222233333333333333333333333333333333333333333333333333333 


# fc« d # 


DM** c c c で 

K ひ r d d d d 


リス 卜 3 


抨« 用 プログラム 

S C A N . B A S Version 1 .01 
( 餐 • SCANNER . FNC , SCANSUPPORT . FNC , + a ) 
presented by Hayash i Art Products 1990 


i t j i c 1 , c2 , c3 , cure , curs , v 
mpos = 0 t ch = 0 , act = 0 , ss = 0 


14 int srm=2 


scm=0 /* 頒 画 サイズ デフ ォ 
/*(0：768»512/ 1 ： 102 

XW(3)={96, 120,64 ,64} ,YL( 3 
GS(31) ,FU し 1XOU255) ,cnvco 
PALSC{3,6)={ 0,31, e, 0, 


int CNVSC(5,6)=(15 ( 


L 番号 * ノ 

512*512,65535/ 2:768 聿 5121 */ 
1536/ 2=512 聿 512/ 3:512*1536 
{512, 1536, 512, 1536} 


'Wtt カー： 


30 int imgbuf (5106) 
31 char palbuf ( 32) 

32 char MTHEAD ( 9 ) = f 2 , 0 , C 

33 atr meaflagef 100] .maek 


MAIN MENU 


40 me38age=" [画面- 
r If 

niaBk=' '零 蓴》 拿 *'■ 


卜'】 【 


« 化 U 


存】 （ W 


if curc=2 or ss>0 then mask [ 2 ] = 

cle : tmp=menu{ 2 , 】 , tnesaaffe , c 

i f tmp=- 1 then cont inue 

ch= tmp 

switch ch 

caae 0 ： scrmod { ) ： break 
case 1 : Bcanmod ( } : break 


lse mask[ 2]=42 


456： t2_coliirinloop 
457 : move 
分 


463： 
464: 


move. 1 
move 


move, 
andi . 1 
move. 

rol.w 

move.! 

andi 

move.! 

add.b 

rol.w 
move.1 
andi -， 
move.l 


addq.l 
movea.. 


movea. 
movea.' 

move.w 

t3 newline 

roove.w 
t 3_co lumnloop 

move.w 

分 

move.w 


move. 
auba. 1 


addq. 


256{a0) ,dl * テキストの データ. 3 ライン 


128(a0),d2 *(dl-d3) 
{a0)+,d3 

#8-l,d5 * 8 ド"/ ト 打つ 

«2,dl «2«1=6 ド' ソ ト より 1 龌 点を打つ 

dl.dO 

#3,d0 

(a2,d0,w) t d4 

*2,d2 
d2,d0 
#3,d0 

(a2,d0.K),dO 
d0,d4 

»2,d3 
d3,d0 
*3,d0 

(a2,d0.w),d0 

d0,d4 *d4=«t 度合 針 

*2,d4 

2(a5,d4.w),(al) 

a4,al * — つ 上の 点の ァ ドレス 

d5，t2— dot 上 oop 

do , t2_co lumnloop 

256 (a0) ,a0 * 次 ライン 先頭の アドレス 

*2,a3 

a3,al 

d7,t2_new 丄 ine 


H0DE3, 1024*1536 to 512*768, 5colors 
VTABLE2,a2 

OVLBH,a3 *a3= ク' ラフィック 左下 アドレス 

a3,al 

42048 ,a4 

«768-l,d7 *d7= ラ イン カウンター 

#64-1, d6 »d6= カラム カウンター 
128(a0) t dl * テキストの データ， 2 ライン 
(a0)+,d2 

#8-l,d5 « 8 ドヅ ト 打つ 

#2,dl »2*2=4 ドッ ト より Lffl 点を打つ 

dl,d3 

#3,d3 


*d3=4 ド' ノ トの パターン 

(a2,d3.w) ,d3 
#2,d3 . 

a4,al 

d5,t3 一 dotloop 
d6 , t3_co lumnloop 

128(a0) ,a0 ，次 ラインの ァ ドレス 

#2,a3 


リス 卜 2 


screen 1 , d , 1 , 1 
console 0,32,0 
for i=0 to 5 

g( i)=hsv(0,0,g(i ) ) 
next 

color {65534,0,0,0} 

print "Ready. Please Scan . " 

scant 1,0, 128, 1536 ) 

color [0,0,0,0] 

ttog(0,2 t «) 

els 

color [0, 65534,65534, B5534J 



.data 
.even 
ret_val_adr 



return_val 

da.l 1 

SSPBUF 

ds.l 1 

******* ドウ 卜 バター ン —明度 換 テーブル ******* 



* 2 1 ド' ソ ト （3 階 調】 



VTABLE2 


3 2 0 0 3 

d d d d d 

2 2 2 3 o 


CQCPCCCC cccccccccbc^bcn~c 



98 Oh! X 1990.9. 


► ^ ^郜の 中で 「カノ ッサの 屈 殍」 （フジテレビ） を 見て いる 人い ません か ？ 私 は 初めて 
兄た と き， オープニングと 内容の ギャップに 大笑いして しまい ま した。 

岸 村雅史 (21) 神奈川県 


5 

) case 2 : bicol ( ) :break 




155 cls:waitmes( ) ： flush { ) 



5 

I case 3 : f i le ( I ： break 




156 endf unc 



5 

J case 4 :quit( ) :break 




157 /* 



5 

3 endswi tch 




158 /拿 = TO 2 COLORS ============================ 


====*/ 

5 

4 endwhile 




159 /* 



5 

> end 




160 func bicol ( I 



S 

6 t、 




161 int i , tmp, srs=0 



5 

7 /*= CHANGE SCREEN MODE ====================== 




162 atr tnesaage【64i 



6 

8 /* 




163 message=rightS( "[ 6)【 511 4 1 E 3 1 1 2J【 

1 ] [ 

取消 1 に， cu 

5 

9 f unc acrmod( ) 




rc*5+2 ) 



6 

0 int tmp, ad=0 




164 if srm= 1 then srs=l:srm=0:waitmes( ):fluah() 



6 

1 a tr message[ 64 ) 


] t 


165 act=l :cla 



6 

2 message="[ 512x5121(768x5121 【 ， 

t り 消し 


166 tmp=menu (2,1, message , "***»*«*", in t ( curc/2 ) - 

167 act=0 

1 ) 


6 

3 if srm=2 then ad= 1 




^ k Q if s r s — 1 t H** n s rm~ 1 



6 

4 tmp=menu{ 11,2, message , " *> t" , ad ) 




169 if (tmp= - 1 or tmp=curc- 1 ) then ( 



6 

i if tmp=-l or trop=2 then return ( ) 




170 if ars=0 then paldef ( I : return ( ) 



6 

6 if tmp=0 then ( 




171 ) else { sa=curc-tmp- 1 ) 



6 

7 message- "【 16 色】 f65535 色 U 取り 

M し 1 に 



172 waitnes( ) : f lush{ ) 



6 

8 tmp=menu (23,3, message ,"***", arm+2* ( srm=2 ) 

- 



173 endfunc 



fi 

9 if tmp= - 1 or tmp= 2 then return ( ) 




174 /* 



7 
7 





175 /*= SAVE FILE ============================== 



7 

2 J 




176 /* 

177 func file( ) 



7 

3 srm=tmp : ss=0 




178 int tmp 



7 

4 wai tmes ( J : flush ( ) 




179 atr nie3sage[6" ,maBk[ 10】 = " * *" 



7 

5 endf unc 




180 raeBBage="[ . G S 3 1【 . P I C 1( . C U T 】 【 取 清 

][" 


7 

6 /» 




181 if then mask! 0]=42 



? 

7 /拿 一 REDRAW SCREEN 

$/ 



182 if arm=2 then mash[ 0 )^42 ： if ss>0 or scm=0 o 

r scm=2 then m 

7 

8 /* 




ask【2】=42 



7 

9 func f Lush( ) 




183 switch menu! 11 , 5 , message , mask , 0 ) 



8 

0 wipe( ) :home(0, 0,0) 




184 case 0 : gs3save( ) : break 



8 

1 if srm=0 then ( /* SWITCH 文の 中で （ま フ' 

口. ソク IF 爻 

が 


185 caBe 1 ： picsave ( ) ： break 



« え 

な い 》/ 




186 case 2 ： cutsave { ) 



8 

2 img_9crn (1,1,1)： vpage ( 1 ) 




187 endsui tch 



8 

3 white=15 




188 endfunc 



& 

4 if scm=2 then hornet 0 , 426 , 0 ) 




189 /* 



S 

5 if acm= 1 or acm=3 then I 




190 /«- .GS3 FILE SUPPORT 



c 

5 curc=7 : curs=3 : paldef () ： cnvdef ( ) 




191 /* 



& 

7 ttogf 2 ,2,cnvcol ) 




192 func gs3save( ) 



fi 

8 ) else { 




193 int i , j ,p, fp 



fl 

9. cure- 4 : curs - 1 : paldef ( ) : cnvdef ( 1 




194 9tr fnmt 32 J 



9 

S 

0 ttog< 2 , O.cnvcol ) 
1 ) 




195 if srm=2 and scm<>2 then txtfi IK 1,512,0,25 

6,51 

2.&HAA55AA 

9 

2 return t J 




55) 

196 fnm=fnrainput( 14 , 12 , " .GS3" ) 



i 

3 ) 




197 if f nm= " " then return ( ) 



s 

4 if arm= 1 then f 




198 if chkdskf ( fnm, 132100) then return! ) 



t 

5 img 9crn( 1 , 2 , 1 ) : curs = 5 : palde f { ) : img acrn ( 1 

,3,1) 



199 cls:meaprint{-l,15 t " .GS3 を 保存して 

い ま 


s 

6 white=GS( 31 ) 




200 img^savef fnn+" .GS3" ) 



i 

7 if scm=2 then home(0 , 426 ,0 ) 




201 i f bb>0 or curs = 0 then return ( ) 



£ 

8 if acm= 1 or acm=3 then ( 




202 fp=fopen( fnm+" . PLS " , "c" ) 



{ 

9' curc=7 : cnvdef ( ) 




203 if fp=-l then fileerr に' ノ、' レヅ 卜'' ） ： re turn ( > 



10 

0 ttog(2,2,cnvcol) 




204 cls:meaprint(-l, 15," ノくレ ，ソ トフ アイ ル " + fnm 

■f " .P 

LS を 保存 

1( 

1 ) else ( 




しています • i 



10 





205 for i=0 to 3 1 ： palbuf ( i ) =0 ： next 



1( 

3 tto«(2,0,cnvcol) 




206 for i=0 to 6 



10 

4 J 




207 p=PAL3C(curs,i ) 



10 

5 return ( ) 




208 palbuf(i*2)=p ¥ 256 



10 

6 ) 




209 palbuf ( i»2+l )=p mod 256 



10 

7 if srm=2 then { 




210 next 



10 

8 img_acrn( 2,0, 1 ) 




211 fwrite(palbuf ,32, fp) 



10 

9 whiter 15 




212 fcloael fp) 



1 J 

0 if scm=2 then home( 0 , 896 , 0 ) 




213 endfunc 



1 1 

1 if scm= 1 or scm=3 then ( 




214 /* 



1 】 

2 cure = 5 ： curs = 2 ： paldef ( ) ： envde f ( ) 




215 /拿- .PIC FILE SUPPORT 


*/ 

1 】 

3 ttog(2,3,cnvcol) 




216 /» A P I C . R をお 持ち 

の 方 

へ * / 


4 i else ( 




217 func picsave ( ) 



11 

5 cures 2 :curs=0: palde f( 1 : cnvdef ( ) 







1 1 

6 ttog (2 , 1 ,cnvcol ) 




219 atr fnmt 32 1 



1 1 

7 ) 




220 fnm=fnminput( 14, 12, " .PIC" ) 



1 1 

8 ) 




221 if f nm= " " then return ( ) 



1 1 

9 endf unc 




222 cls:mesprint(-l ,15," " + fnm+" .PIC を 保存して 

い ま 


12 

0 /* 




223 ec=child( "APIC /S "+fnm) 



12 

1 /*- CONVERT COLOR DEFINITION 

*/ 



224 if ec<0 then errmea に A P I C.R のお ft に 失 

1 し 


12 

2 /* 




: return! ) 



12 

3 func cnvdef ( ) 




225 if ec>0 then fileerrf " p I C " ) ： return( ) 



12 

4 int i 




226 console 0,31,0 / 韋 APICG.R は麵面 モー 

ド を 

しない 

12 

5 if bs=0 then { 




*/ 



12 

6 for i=0 to 6 : envcol ( i ) =CNVSC ( curs , i ) : next 




227 fp=fopen( "CON" t "w" ) : f wri tea ( chrj ( 2 7 ) + " [ > 5h " 

.fp) 


IS 

7 } else ( 




) 

IS 

8 for i = 0 to curc-aa-1 ： envcol ( i ) =whi te : next 




228 mouse { 2 ) :mouse ( 4 ) 



12 

9 for i=curc-88 to curc-1 : envcol ( i ) =0 : next 




229 endfunc 



13 
13 

e } 

1 end func 




230 /* 

231 /傘 - .CUT FILE SUPPORT 



1： 

2 /* 




232 /* モノトーン をお 持ち C 

) 方' 

S. */ 

13 

3 /*= EXECUTE SCANNING ======================== 




233 func cutsave( ) 



1 3 

4 /• 




234 int rax,my,bl,br,fp 



13 

5 func scanmodf ) 




235 str k[l] ，fnm【32] 



13 

6 int i , XW| yl 




236 els :mouse( 1 ) : txthome ( 44 t 16 ) 



13 

7 str messBge[200】 ,dns[ 16J ,dir( 16】 




237 home ( 0, 0 . 0) 



13 

8 measage=" [ 400dpi : 48 x 32mm { | ) ] [ 400dpi :6A x 96mm (-*■)] 

200 



i / 

* 枠 '/ 

dpi: 

64 X 64mm ( | リ （ 200dpi : 64 x 192mm( -*■))[ 取り 

■iff しけ " 



239 txtrev( 1,66,32,2,480) : txtrevf 1,768,32,2,480 


13 

9 tmp=menu ( 1 1 , 3 , message i , Bcm ) 




240 txtrev(0,86, 30,683 , 1 ) ： tx tre v ( 0 , 86 , 5 1 2 , 683 , 1 



14 

0 if tmp=- 1 or tmp=4 then return ( ) 




241 txtrev(0 , 86 , 31 , 1 ,481 ) : txtrevl 0 ,768,31,1,481 



14 

1 scm= tmp 




242 meaprint( 13,3," » 存 する 範囲 を 指定して 下さ t 



14 

2 cls:wipe( ) ： txtclr(3,0) 




243 msarea(0 , 0 , 86 r 32) ： setmsposf 4 4 , 16 ) 



14 

3 color[GS(30) ,C1 ,C2 ,C3] 




244 while 1 



14 

4 if acn=2 or acm=3 then ( txtclr ( 2 , -1 ) 




245 msstat ( mx , my , bl , br ) 



14 

5 txtfill(2 I 0, 0,512,5 

12.&HAA55AA55 


246 if br or hi then kbf reel ) 



) 





247 nspos (mx ( my ) 



14 

B txtfill{3, 512,6,512 

,512,-1 ) 



248 k=inkey$(0) :ak=asc(k) 



14 

7 dns=" 權 準 < 200dpi ) ■■ 




249 if ak then i /* 汚い けど 离速 化の A */ 



14 

8 ( else ( txtclr(2,&HAA55AA55 




250 switch ah 



14 

9 dns = " ffi 密度 (400dpi ) 

' ) 



251 case 28 :mx=mx- ( mx< 88 ) - ( mx<87 ) : break 



15 

0 if scro=0 or scm=2 then ( dlr= " 上 力、 ら下 へ'' 




252 case 29 : mx=mx+ ( mx> 0 ) + ( mx> 1 ) ： break 



15 

1 } else ( dir-" 左から 右へ" 1 




253 case 30 : my=my+ ( my> 0 ) + ( my> 1 ) ; break 



15 

2 nesprint( 1,1," » 取 密度 を "+dna + " にセヅ 卜し， 

'+dir+" « 

ん で 


254 case 31 ; my=my- ( my < 3 2 ) - ( my< 3 1 ) 



下 さ 





255 endswi tch 



15 

3 acanl JS,2,XW(scm) , YL(scm) ) 




256 1 



15 

4 bs=0 ： color [0, CI ,C2 ,C3 ] 




257 setmspos ( mx , my ) 




► 今^の 受験の 鉄則 は 「ポ ピュ ラス」 を K わない ことです。 野 1-1 友 则 （18) 次 城お 
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258 txthome ( 88-mx , 32 - ray ) 

259 if bl or ak=13 or ak=32 then fnm=fnminput( 1 
break 

260 if br or ak=27 then break 
261 endwhile 

262 txtclrfO, 0) : txtclrt 】 ， 0 » : txthome ( 0 , 0 ) 

263 if fnrnO " " then if chkdskf ( f nm , 4 1 800 ) =0 then 

264 fp=fopen(fnm+".CUT" , "c" ) 

265 if fp=-l then { 

266 f ileerrC CUT") 


"+fnm+" 


cla :mesprint{-l 
fwritetMTHEAD, 10, fp) 
hget(mx,ray,85,240 ( imgbuf ) 
fwritet imgbuf , 5100 t fp) 
hget(mx,my+240 , 85 ,240 , imgbuf ) 
fwrite( imgbuf , 5100,fp) 
fclose( f p) 


mouse(2 ) 

if scm=2 then hornet 0 , 8 
endf unc 


を 保存し' 


ます， 


/«- CHECK FREE— AREA SIZE 

/* 

f unc int chkdskf ( fnm ； str,size;int 
int d,l ,r 

if instr( 1 , fnm, " : " ) then { 

d=fmn[0】-64 

if d>26 then d=d-32 
} else d=0 

i f dskf (d ) > =size then return ( 0 ) 
errmes に ディ スクの 空き 容量が 足 i 
return! - 1 ) 
endf unc 


/*- INPUT FILENAME 

/* 

f unc str f nminpu t { xpoa ； 


t ， ypos ； int , ext ； s tr ) 


3tr f nm[ 20 ] = " " , k ( 1 ) , mes [ 20 } = " フ アイ/ レ名 ： " 
mesprint ( xpos , ypos , nes+spaceS ( 20 ) +ext ) 
xs=xpos+ 12 
while 1 

locate j£s+xx , ypos 

color 9 ： print" " ； chr$ ( 29 ) ; :color 3 
k=inkey$ : ak=asc{k ) 
switch ak 

case 8 /* 削除 */ 

case 29 
case 127 

if xx=0 then break 
xx=xx-l 

color 1 1 : print" " ； : color 3 
f nm( xx ] =0 
break 

case 13 /* H7 */ 

case 32 

color 11 : print " ； : color 3 

if xx=0 then return ( " " ) 

mesprint { xpos + 6 ， ypos + 2 , " よろしいです 

repeat 

k= inkeyS ( 0 ) 

msstat ( dmy ,dmy , bl ( br ) 
until k <> " " or bl or hr 
kbf ree( ) 

if instr( 1 , "Yy>" ,k 1 or bl then return! fnm I 
case 27 

return ( " " ) 
def aul t 

if xx= 19 or ah<32 then break 
color 5 : print k ； : color 3 
txtrev( 1 , (xs+xx ) 零 8 , ypos* 16 , 8,16) 
txtrevl 0 ， (xs + xx > *8,ypos* 16 , 8,16} 


[ Y, 


364 mmax= i - 1 

365 yl=mmax»lfi+23 

366 xw=mwidth*8+18 


32 then break 
then return ( -I 


Jba 1 i masklchoicej 

369 choice=choice+l 

370 i r choice=mmax+ 
371 endwhile 

372 txtf l,xp-3,y*16-3,xw+5,yl , 

373 txtf till 0,xp-3,y*16-3,xw+5,yl , 

374 for i=0 to mmax 

375 if mask【i】=32 then color 6 e 

376 locate x+ 1 , y+ i : prin t mes ( i ) 

377 next 

378 color 3 

379 txtrevf 1 ,xp-3 , y* 16-3 , xw+5 , yl ) 
360 txtrevt 0 ,xp-2 ,y 聿 16 - 2,xw+2 , yl-3 


txtrev ( 0 , 


, ( y+choice J 


= .vytdy 


while 1 

k= inkeyS ( 0 ) ： ah =aBc ( 
msstat ( dx , dy , bl , br ) 
yy>5 then ak=3 1 : 
yy<-5 then ak=30 : yy=0 
if ak+bl+br=0 then continue 
kbf ree ( ) 

if ak= 1 3 or ak = 32 or bl then return ( choice I 
if ak=27 or br then return ( - 1 ) 
if ak=31 then ( /* Down */ 

txtrev(B,xp-l , (y+choioe )*16-1 t xw r 18) 


wh ne tmp< ( mmax ) 

tmp= tmp+ 1 

i f mask [ tmp | < > 
endwhi 】 e 
break 


then choices tmp : break 


) 

if ak=30 then ( /* Up */ 

txtrev ( 0 , xp-1 , i y+choice ) * 16-1 , xw , 1 8 ) 
tmp=choice /* Skip */ 
while tmp>Q 
tmp= tmp- 1 

if mask( tmp] <> 32 then choicer tmp: break 
endwhile 
break 


1 endwhi Le 

2 endwhile 

3 endf unc 

4 /* 

5 /* 一 ACTION AT CHANGING LINE 

6 /» 

7 f unc action! ch ； int ) 


switch act 

420 case 1 

421 if ch=curc-l then paldef ( I : return 1 ) 

422 for i=0 to curc-ch-2 : palet ( i , 0 ) : next 

423 for i=curc-ch-l to curc-1 :palet{ i ,GS( 

424 endBwi tch 

425 endf unc 


427 /l= PRINT MESSAGE = 

428 /* 

429 f unc mesprint ( xpos ； 


431 if xpoa=-l then xpos = 3 2- ( srm=2 ) *16- 

432 x=xpos*8 ： y= ypoa*16 ： l = len{message J *8 
433 locate xpoa , ypoa 

434 color 5 :print message :color 3 

435 txtrev ( 1 ， x-2 , y-2 ,1+5,21 ) 

436 txtrev(0 t x-l ,y-l ,1+2, 18) 

437 endfunc 


ypoa ； inl,me9sage;str) 

len ( message ) / 2 ) 


334 endswi tch 

335 endwhile 

336 endfunc 


0) 


340 func quit( ) 

341 switch menuf 1 1 , 

342 case 0 

343 screen 2,0, 

344 case 1 

345 txtclrl 2 , & ！ 

346 endswi tch 

347 endfunc 

348 /* 

349 /*= CHOICE ITEM 

350 /* 

351 func int menu (x ; 


6 , " 【 as b 保存 is 消去 j (取り 消し i に，'' * 

l , 0 : palini t ( ) : spowerl JS , 0 ) ： end 
:txtclr(3,0J : width 96 :spower ( JS , 0 ) : end 

ON MENU =============================* 

int i y ； int , message ； str , mask ； s tr , cho ice ； 


354 int 1 , ak ,mroax f yl ,mwidth = 0,xp,xw, tmp 

355 str ki 1 】 ,mes( 10) 

356 xp=x*8 

357 while 1 

358 dlm=inatr( ps , message ,"){") 

359 if dlm=0 then break 

360 mes ( i ) =mid$ ( message , pa ,dlm~ps ) 

361 l=len{ mes ( i ) ) ： if l>mwidth then mwidth=l 

362 ps=dlm+2 ： i=i+l 

363 endwhile 


441 f unc wai tmes ( ) 

442 mesprint (- 1 ,15," 

443 endfunc 

444 /* 

445 /*- CANNOT CREATE FILE 

446 /* 

447 func f ileerrl f nm ； str ) 

448 errmes ( " "+fnm+" フ ァ - 

449 endfunc 


らくお 待ち 


451 /*- ERROR OCCURED! - 

452 I、 

453 func errmes ( mea ； str } 

454 int d,l,r 

455 els ： mesprint ( -1 

456 beep 
467 repeat 

458 mastatfd.d.l, 

459 until inkeyS ( 0 J 

460 kbf ree ( ) 
46 1 endfunc 


HOUSE KEEPING =========r====== 

INITIALIZE Bl DEFINE CONSTANTS 


467 funo init ( ) 

468 screen 2,0,1 

469 Cl=hav(0 t 0,2 

470 C2=hsv(0 f 18, 
471 C3=hsv(C,0 t 3 
472 palini" ) 


iconaole 0,32,0 

/* 非遍枳 枝の 色 》/ 
) /* 文字と 枠の 色 */ 

/* の 色 《ノ 


► iii [近. 股の 綢子が 悪く， 伐 の^の 中で たくさんの 人が 沼に はまって いきます （ゴ ボシ， 
100 Oh! X 1990.9. ゴボシ ）。 福 知 健 （19) 京都府 


473 meaprint (-1,15," Handy Scanner Driver & Filer vl . 00 by 
• 

474 apower{ JS ， 0 ) 

475 mouBe ( 0 ) : mouse { 2 } : mouse ( 4 } 

476 for i=0 to 31 ： GS { i ) =hav ( 0 , 0 , i ) :next 

477 for i=0 to 127 

478 FULLCOLI i*2)=i*514+l 

479 FULLCOL( i*2+l ) =FULLCOL( i *2 ) 

480 next 

481 for i=0 to 3 

482 for j=0 to 6 

483 PALSCf i , j ) =GS ( PALSC ( i , j ) ) 

484 next 

485 next 

486 for i=4 to 5 

487 for j=0 to 6 

488 CNVSC (i, j>=GS( CNVSC ( i, j ) ) 

489 next 

490 next 
49 1 endfunc 

492 / 聿 

493 /*- TEXT PALET INITIALIZE */ 

494 /* 

495 f unc pal ini t ( ) 

496 int i 

497 for -i=0 to 3 : txtpalet ( i*4 , C ) :next 

498 for i=0 to 3 ： txtpalet ( i *4+l , CI ) :next 


499 for i=0 to 3 : txtpalet ( i*4+2,C2) :next 

500 for i=0 to 3 : txtpalet! i*4+3,C3) :next 
501 endfunc 

502 /* 

503 /*- GRAPHIC PALET DEFINITION */ 

504 /* 

505 func paldef { J 

506 int i 

507 if cura> 3 then ( 

508 for i=0 to 255:palet( i , FULLCOLI i ) ) :next 
589 ) else 1 

510 for i=0 to 6 :palet ( i , PALSC(curs , i I ) :next 

511 paletl 1 5 , GS ( 3 1 ) ) 

512 ) 

513 endfunc 

514 /* 

515 /*- KEY k BUTTON FREE ？ */ 

516 t、 

517 func kbf ree ( ) 

518 int dd,dl ,dr 

519 repeat ： unti 1 inkeyS ( 0 ) = " " 

520 repeat : mss tat { dd , dd , dl , dr ) : until dl+dr=0 
521 endfunc 

522 /* 

523 /*= FIN 

524 /* 


include 

FDEF.H 

include 

I0CSCALL. 

include 

DOSCALL.H 

globl 

_txtclr 

globl 

_txtpalet 

globl 

txthome 

globl 

_txtfill 

globl 

一 tictrev 

globl 


globl 

—child 


隼韋車 本 マク a ま ft 本 》» 

PUSH macro REG— LIST 

movem . 1 REG— U ST,-(sp) 
endm 


Version 1 .03 
Presented by Hayashi Art Products 


リス 卜 4 


========= 3CANSUPPORT.S ================== 


AS I C 拡張 MS: ラ- 
XC ライブラリ 共通 


M 数 群 


(viodj txtclrl plane , style ； int) 

plane ： テキスト ブレーン 

0 〜 3 

style ： ペイン トス タイ 
&hxx_xx_xx_xx 
t t 
1 ライン 目 … 4 ラ >i 

テキス ト豳面 を styie で 指定 さ 
でク リアし ます 0 


(void) txtrev( plane, xl ,yl ,\w,yw ； int ) 


plane ： テキスト 

ブレーン ナンパ 

0 〜 3 
： 先頭 X ほ 


yi ： 先 K Y g 

- 標 

xw ； X 方向 ife 

i 

yw ： Y 方向 « 


ス ト 画面の 任意 

d 矩 領域 を 反 転 


します。 これ も — TXREV を 呼ぶ だけです。 

〜 〜 ，cirr フ アイ ル サボ一 ト用 〜〜 


[void) txthome (x,y ； int} 

x,y ： テキスト 画面 表示 位 》 
テキス ト睡面 を スクロール します。 

T X T F I t し 


〜〜 外部 フ アイラー 対応 用 -、 
CHILD 
( int) child( cli ； str) 


[int) txtpalet ( paletcode .colorcode ； i 

paletcode ： テキス 卜ノく レツ 

0 〜 1 5 
colorcode ： カラ一 コード 


の 時 ！ 
t で す 


(void) txtf ill {plane, xl,yl .xtJjyw, style ； int) 
plane : 



style : 

テキス ト S 面の 任 jg の 矩形 頜 W! を 塗り * し 
す 。 JTXFILL を 呼ぶ だけです。 


567890123456789012345678901234567890123456789012345678901234567830123456783 

77777888888888899999999990000000000111111111122220^2222233333333334441-444144 


数数 配 

ム ン元 

標樣 ライ 次 

座 座 カラ 一 

X Y 向 向 型 

点点 方方 値 

始始 X Y 数 


クみ R で 

ッ JKO 定 

ィ にの 指 

フ列ン の 

ラ配 一位 

グでレ 単 

の トプタ 

^ ッ 4 ク 。 

£ ビはラ い 


ッデ はて 


e X y ^ V- r 


サ 1 。の 意 

面 、す 向 注 

固 を ま 方で 

実 面み X の 

隨込 す 


了 ンた 

&、 シぃ 

n マ ほ 

列 す k 样 

字 ま 8 り 

文し 6 よ-.' 

ン動 x,»" | 

ィ起， W だ 

ラ を 号 門 ん 

ド ス S: 入 い 

ン セ ol« な 

マ 口す 年グ き 

コ プま o ン で 

ドし OJ ミ で 

i ル返 X ラ 。！ 

C ィを！ グ たで 

ャド h 口 しん 

チ I o プ まな 

コ 語し f 


ァ I ,だ う 

卜が する よ 

ッド ま. i し 

レ I しでで 

パコ 返ん い 

( 一 を 呼な 

トラ ドを耍 

ッカ 一 ^ 必 

レ 。コ おは 

バす I 8 で 

卜まラ M C 

スしカ M X 

キ の细 . 

テ定 在， で 



プ 標標 ス 

ト 座 座 幅 g ト 

ス 3X V- 向 向 ン 

キ f 賊 SS 方方 ィ 

テ o 先先 XV- ぺ 


► ポピュ ラス 本体で は 空飛ぶ じゅうたん， プロ ミス 卜 ランドで は 力 二の 化け物。 マップ を 

横断しながら 山脈 を 作って いく こいつら は 何者なん でしよ う ？ 中 花 也須史 (22) 神奈川県 
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move.w 
rol .1 
tcloopl : move.b 
dbra 

moveq. 1 
rol.l 
tcloop2 : move.b 
dbra 

moveq. 1 
rol.l 
tcloop3 : move.b 


moveq 
rol.: 

tcLoop4: move 


move 
move 


—SUPER 
#128-1, d2 


(afl) + 
tcloopl 


d2,tclcxsp2 
攀 128-1, d2 


(a0) + 
tcloop3 


(a0) + 
tcloopl 


_SVPER 
4(sp) ,ap 

#S000l,d1 
#256, d2 
_TXRASCPY 

dl-d3/a0 


(とりあえず l ラスタ を 


. even 
X-BASIC ェ ン ト 
xtpalet 

move. 1 
move. 1 


move.l 
moveq. 


12(sp),d0 
22(sp),dl 
d0-dl 

_txtpalet 

4*2(sp) ,sp 

d0,return_val * 返 0 ffi 
#0,d0 

ret_val_adr(pc) ,a0 


_txtpalet 


dl-d2 

8(a6) t dl-d2 

_TPALET2 

dl-d2 


X-BASIC x 
xthome 


move . 
move. 


12 ( spl.dO 
22(sp) ,dl 
dO-dl 

_t xthome 

4*2(sp) t sp 


moveq. 
movem. 


8(a6) ,d2-d3 
—SCROLL 


macro 
movem. 1 


(sp)+,REG_LIST 


TORAM 
GVRAN 

零； * 拿 拿聿拿 尊 x - 

init_adr 
run adr 
end adr 
ays tern 一 adr 
break— adr 
input— adr 
reserve 1 
reaerve2 
token_adr 
parameter_adr 
exe_adr 
reserve 

token table 


S I C 用 


SEO00OQ 

sceoaee 
y ******* 

return 

return 

return 

return 

return 

return 

return 

return 

tcrften_ table 

param_adr_table 

exe— table 


"txtclr",0 

"txtpalet",0 

"txthome",0 

"txtfill"^ 

"txtrev" ,0 

*"hget",0 

■'child", 0,0 


param_adr_ 


txtclr_pRram_tabte 
txtpalet Darain^ table 
txthome mram_Lable 
txtf ill_param_table 
txtrev_param_table 


txtclr pa ram_ table 

dc.w int_va 
txtpalet_poram_tahle 


tx thome_peram_table 
dc.w ii 

txtfilljparam table 
dc.w 

txtrev_param__tabl 


hget_paran_tab 
dc.w 
childjparam—' 


■am 一 tab 
dc.w 


exe table 


atr_va 


child_param_table 

, int_val , void ret 
i int—val ， int— ret 
nt_val ,void ret 


val , int val .void ret 


nt_ret 


txtclr 

txtpalet 

txthome 

txtfi II 

txtrev 

hget 

child 


.even 

* X-BASIC X ン 卜 
txtclr 

move. 1 
move. 1 


moveq. 1 


12(sp),d0 
22{sp) ,dl 
d0-dl 

_txtclr 

4 傘 2<sp> ,sp 


* 引 お： 


245: _txtclr 


LINK 
PUSH 


dl-d3/a0 
8la6),d0/dl 


swap.v; 
lea 


ビープ 


指定 


67890i2345678901234567890123456789012345678901z34567898123456789012345678901234567890123456789012345678901 

5E556666666666777777777788888888889999999999000000000O1111111111222222222233333333334444444444555555555566 

2222222222222222222222222222222222222222222233333333333333333333333333333333333333333333333333333333333333 


ラ 

第 を I 

f タビ 

タス n 

スラに 

ラ 6 向 

o 5 方 

«S2 下 
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► » いです ね。 おまけに 眠いです。 » く て 眠い と き はやつ ばり X68000 を 起動させる べきな 

ので はないで しょ う か ？ iff 水^ 明 （22) 神奈川 m 


X - bask; ェ ： 


move 
move 
move 
move 
move 
move 


_txtfill 


d0-d5 
_txtfill 
4 本 6<sp> , sp 


dl-d5/al 


392 
393 


movent . 1 

8(a6),d0-rf5 

» 口 

ングヮ 

394 


movem.w 

d0-d5,-Iap) 

* ヮ 

一 ド 列 

395 


movea . 1 

sp ( al 



396 


IOCS 

_1XFILL 



397 
3gg 


lea.l 

2*6(sp) ,sp 



399 
400 
401 

4ez 

403 


POP 

UNLK 

rts 

dl-dS/al 

- a6-'\. ゝ 



404 

405 
406 
407 


t r e v ( i 

> ， x 1 ， x 2 ， 


y w ) 

408 


■ even 




410 
4j j 

* X-BASIC ェ ン トリ 




412 

txtrev 





413 


move. 1 

12(sp),d0 



414 


move. 1 

22 (sp) ,dl 



415 


move. J 

32(sp),d2 



416 


move- J 

42(sp) ,d3 



417 
418 
419 


move . 1 
PI.SH 

52 (sp) ,d4 
d0-d4 



420 
421 


bsr 

—txtrev 



422 


lea.l 

4*5 (sp) ,sp 



423 
424 


moveq ■ 1 
rts 




425 






426 

« C ェ ン 

卜 リ 




427 






428 

—txtrev 





429 


LINK 

a6 t #'0 



430 
431 


RISH 

dl-<14/al 



432 


movem, 1 

8(a6),d0-d4 



433 


movem.w 

d0-d4,-(sp) 



434 


movea. 1 

sp,al 



435 


IOCS 

一 TXREV 



436 
437 


lea.l 

2*5Up) ,sp 



438 
439 
440 
441 
442 


POP 

UNLK 

rta 

dl-d4/al 

a6 



443 
444 
44S 
446 

« h e 

e t ( x 1 , 

x 2 , x w , y 

w , a 

v y ) 

447 
448 


.even 




449 
450 

t X-BASIC ェ ン トリ 




451 

hget 





452 


move - 1 




453 


move.l 

22Up),dl 



454 


move.l 

32(sp),d2 



455 


move.l 

42(sp) ,d3 



456 


move. 1 

52 (sp) t d4 



457 


atld.l 

*10,d4 


n 先 ai 

458 
459 
466 


PUSH 
bsr 

d0-d<I 



461 
462 


lea. 1 

_hget 

4*5(sp) ,sp 



463 
464 


moveq . 1 
rta 

#0,dO 



465 






466 

» C ェン 

卜 リ 




467 






468 







subq 
aubq 


dl-d6/a0-a2 


8(a6) t dl-d4/a2 
GVRAM,a0 


*a0= グ 



*d4= ラ 


ン 力 

*d3= 力 


ム お 


h .newline 

move.u 
h_columloop 

move.u 
raove.w 

h dotloop 


h itaw 


addq.l 
dbra 


-(sp) 
SUPER 


{a0) + 
h_itsw 


d6,h_dotloop 


d5 ,h_columloop 

2048(al) ,al 
al.aO 

d4 t h_newline 


—SURER 
4 ( sp ) , sp 


dl-d6/a0-a2 


.even 
X-BASICx ン ト 
child 

move. 1 


move. 1 
moveq. 


12(ap) ,-(3p) 
_child 


4(sp) ,sp 

d0 , retum^val 


»返 り IS 


—child 


_c_strcpy 


movea. 
lea.l 
move.w 

move.b 

dbeq 

clr.b 


ret_val 一 adr (pc) ,b 


a6,#-512 
dl-d7/a0-a6 

8{a6),al 

-512(a6),a0 

#255-l,d0 

(alH, (a0)-f 
d0,_c_strcpy 


ィル名 を 入れる と 


— c— exit 


-<sp) 
-256 (a6) 
-512(a6) 

#2 t -(Bp) 

—EXEC 

d0 

— c— exit 


l'Msp) ,sp 
dl-d7/a0-a6 


» その他 を 入れる 
► どこに いるかな 


^ 実行 


ret_val_adr 
dc 
dc 

return_val 


► マジック バス！ オークス タ—！ なつかし一。 1982 年 12 月兮の 表紙に は兒觉 えが あり 

ます。 あの 顷はハ ド ソンの ゲームの リス 卜が 报敝 して あ り ま したね。 創刊 100き-. おめでと ハンディ イメージ スキャナ アダプタの 製作 103 

う ございま す。 船 山窀士 （21) 墒玉 ffi 


/ま *»*«*«**»聿«**«* 傘 》«4««** 


ま ま 傘 拿 ま 《 ま ま 拿 本本 «* 拿/ 


/拿 拿 * 倉 泰韋泰 拿聿 1 拿 隼 享羣》 

f ram { 

( mov ( 


mov { 600 


/聿傘«聿**«ま拿《聿《**«拿《«本« 


mov ( 600 


obj kabe2 



であり， 映り 込み さえ していれば， ノ 、° ソコン CG と して 一 
人前と いつ た 時代 も ありました。 CGA シ ス テムの レン ダ 
リ ング ツールで ある REND では， スキャン ラインと いう 
レイ 卜 レースよ り 高速 性 を 優先した アル ゴリ ズムを 用い 
ている ため， 基本的に 映り 込み を 表現す る こ と はでき ま 
せん。 ですから， この 手法 は 映り 込んで いるかの ように 
ご ま 力' す テクニック といえ ま T。 

図 1 を ご覧く ださい。 まず， a) は 物体が 床に 映り 込ん 
でい る 様子です。 b) は a) から， 映り 込み は その ま まにし 
て 物体 だけ を 除いた 図です。 そして c) は， 半透明の 床の 
下に 上下 逆さ まにし た 物体 を 置いた 図です。 よく 見る 
と， c) の 床から 透けて 見える 部分と， b) の 床に 映って い 
る 部分 は 同じで ある こ とがわ かり ます。 CGA システムで 
は 半透明 体 を サポートして いますので， このような 画像 
は 簡単に できます。 つまり， 映り 込み は， 半透明の 床の 
下に， 上下 逆さまに した 物体 を 置く ことで それらし く 見 
リス 卜 1 映り 込みの フレーム ファイル 




はじめに 


バー ジョ ン アップ サービスの 申 し 込みの— P 祭" 1" ニ 行った 本 
連載への アンケート を 集計して みる！:， 意外に も 「マ 二 
ュ アルに も 載って いない 高度な テクニック」 を 希望す る 
声 力 f 最も 多く ありました。 そこ まで CGA システム を 使い 
こなして いると は 到底 思いません （失礼！） が, 知って 
いて 損 はない し， 皆さんの 声 を 反映させる ために も， さ 
つ そく さまざまな テクニック を まとめて みました。 


I 


映り 込み 


まず は， 非常に 古典的な 手法で， 床の 映り 込み （21 ぺ 
一 ジ • 画像 1 ) です。 鏡面 な ど の ッ ル ッ ル な 表面への 映 
り 込み は， 透明体の 屈折と 並んで レイ トレースの 十八番 


/傘 本 零 **1**；(1»*****：» ネ: It*:***;*** 

f ram ( 

{ mov ( 1100 
{ mov ( 600 




^* 本 ま 塞 * 拿 》*« 拿聿 本 ** ヒ？ * •( 
f ram { 

[ nov ( 1100 -1400 

{ mov ( GOO --100 

Bcal ( — 1 1 1 ) 

light pal( 1 -3 -2 -4 

{ mov ( 600 -400 0 ) 

1 
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せて いる だけな のです。 d) のように， 不要な 部分 を不透 
明な 面で 隠せば， a) とまった く 同 じ 絵に なります。 同様 
に， e) のように 半透明の 壁 を 作り， その 向こうに 左右 逆 
さ ま の 物体 を 置 く こ と で， 鏡の よ う な 効果 を 出す こと も 
簡単です。 

さらに それらし く 見せる ために， もう 少 し 小細工 を 施 
しましょう。 まず， 床の 場合， ただ 1 面の 板で は 気分 力 5 
出ません ので， チェッカー ボードの ように 模様 を 入れて 
やります。 このと きの アトリビュート です が， 透明度 は 
0.3 ぐらいが 適当で し よう。 そして， 模様の 中に 1 種類 だ 
け 0.5 ぐ ら いの 面 を 混ぜて お く と， そこ だけ 周 りより はつ 
き り と 映 り 込み をし， 床の 材 質感が リアルになります。 

鏡の 場合， 床よりも 透明度 を 高く して （0.7 ぐらい）， 
やや 青み がかった 色に する のがよ いでし よう。 さらに 芸 
の 細かい 話です 力 s ， 半透明の 壁に f) のよ う な-模様 を 入れ 
てお くと， もっと 鈸 つぼくな ります。 こ の 模様 は な ん な 
ん だと 聞かれる と 困る のです 力 5 ， 日本の 漫画 や アニメで 
は， なぜか 鈸に はこん な ス ジを 入れる こ とに なって いる 
のです。 

これらの テクニック だけで も 十分に 人 を だます こと 力 ; 
でき るので す 力 f , よく 考える とゥソ があります。 g) のよ 
うに， 本来 映り 込みの 物体 は， 光の 当たり 方， 陰影の つ 
き 方 も 上下 逆になる はずです。 し 力' し， 床の 下に 物体 を 
置いた だけで は， h) のようにな つてし まいます。 これ を 
解決す るの も 簡単で， まず， 光源の 位^ や 方向 も 上下 逆 
にして， b) のよう な 画像 を 作画し， あ と で 物体 だけの 画 
像と 合成す るので す （最新 版の REND では， 合成し なが 
ら 作画す る こと がで き ます）。 さら に， 位 匿| 剁係を よ く 考 
え れば， i) や 画像 1 のよう に 映 り 込みの 映 り 込みなん て 
器用な こ と もで き ます。 画像 1 の フレーム ファイルと， 
REND の 実行の 仕方な ど を リスト 1 に まとめ ますので, 
じつ く り 考えて みて く ださ い。 

しかし これらの テクニック は， しょせん は ごまかして' 

すので， 曲面への 映 り 込みなん てで き る わ けがな t 

こと はあり ません。 その 曲面から 反射 方向に 見た 画像 を 
あら かじ め 計算 してお いて， そ の 画像 を そ の 曲面に マ ッ 
ビング すれば よいので す。 もちろん， やった こと はあり 
ません が …- '- 。 

, 空気 遠近法 

こ れは， ただい ま バ一 ジョン アツ プサー ビス を 行つ て 
いる 最新 版の REND に 新 しく 加わつ た 機能で， 手軽な わ 
り に 効果 は そこ そこあります。 

画像 2 と 画像 3 (21 ベー ジ） を ご覧 ください。 空気 遠 
近 法と は， 遠くの 建物 や 山々 の 大気に よる かすみ を 表現 
して， 奥行き を 強調す る 手法です。 画像 2 が 従来の もの 
で， 遠くの 物 も はっきり 鮮やかな のに 対して， 空気 逮近 
法 を 用いて いる 画像 3 では， 遠く の 物 ほど 青白 く かすん 


図 2 空気 遠近法の 距離 デー タ 

視点 建物 I 建物 2 建物 3 柵 背景 


？ I I 1 に I に I I 1 

距離 0 1000 3000 5000 6000 7500 
, はっきり 見えて ほしい 範囲 —見えなくて よい 範囲 

く 距離 > ： はっき り 見えて ほしい 距離の 1/2 以上 
二の 図で は， 2500 — 5000 が 適当 


でい るの がよ く わかる でし よ う。 CG ら しい 鮮やか さは 失 
う ものの， リアリティ， 存在 感 という も のが 出て い る と 

.B 、います。 

アル ゴリ ズムは 非常に 简 単で， プログラムの 改造 も， 

あっとい う 間で し た。 CG で 隠面 消去の 計算 をす ると きに 
は， 必ず 視点から その物 体 （面） までの 距離 を 求めます。 
そ こ で， 色 を 計算す ると きに， そ の Ifli 離に 応 じ た 大気の 
色 を 加えて やる だけで いいのです。 作画 速度 も ほとんど 
変わりません。 し 力' し， 決して 霧に よる 散乱な ど を 計算 
している わ けで は ない ので， 夜霧の 中 に 浮かぶ ぼや けた 
街頭の 灯な ど を 表現す る こ と はでき ま せん。 

さて， 具体的な 使用法です 力 5 ， 今回 配布す る FFE はち 
やん と 空気 遠近法に 対応 してお り， 背景 設定の 中で 指示 
ど お り デー タを 入れて いた だ く だ t ナ で 設定で きます。 与 
える データ は， 〈距離〉 と 〈色〉 2 種類です。 〈色〉 は 上 

図 1 映り 込み 






) 視線 


、 


鎌 


実体 


床への に— 
映り 込み 


- 鏡に 映った 庞 


床に 映った 鏡像 


床に 映った 镜 





D5GA.CG アニメーション 講座 


記に もあった 大気の 色で あり， 遠く の 物体が どんな 色に 

染まって い く のか を， RGB で 与えます。 空の 色と いうの 
は， ある 意味で 大気の 色と いえます ので， 通常 この 値 は 
背景の 色と 同じに な り ます。 画像3では1^}8=0.2，0.7， 

参考 コラム AMAP の アルゴリズム 


'ビングす る 方 も， まず AMAP で 自動 発生 を させた 
、う パターンが 多 く なると 思います。 そのために 
> て おくべき でしよう。 ちょっと 複雑です 力 5 ， 図 を 


実際問題と して， 手 作業で マ'： 
あとで エディタで 手直しす ると I 
も， AMAP の アルゴリズム を 知 - 
見ながら 理解して く ださい。 
'ァ トリ ビュー ト ファイルの 変更 
マッピングの 対象と なる ァ ト リ ビュー 卜の 各々 に， 以下 4 つの デ 一タカ、' 加わる。 
mapwind ( 0 0 255 255 ) 
mapview ( 0 0 255 255 ) 
mapsize ( 0 0 255 255 ) 
colormap (<1H 象フ ァ ィ ル〉） 
く 画像 ファイル〉 は， AMAP 実行時に 指定され る ファイル 名が 入る が， mapwind, 
mapview, mapsize の 各 パラ メータ は 固定 ィ 直と なる。 
• 形状 ファイルの 変更 

図 a (0, 0) (255. 0) „ 


貼り付ける 画像 ファイル は， 256X 
256 の 固定と している。 だから， uv 座 
稱は図 a のように 決定す る。 

また マッピング される ポリゴンが 
図 匕のと き， AMAP にかけ る 前の 形状 
データ は 以下の よ う になって いる。 


(0, 255) 



prim poly ( 500 100 


) 


200 第 I 頂点 
300 第 2 頂点 
350 第 3 頂点 



第 I 頂点 


第 3 頂点 


このと き， 以下の よ うにして， UV ぺ 

ク トル を 求める。 この 時点で は， 原 

点 （0, 0) は定 まらず， uv 座標で は ない 
ただの ベクトル である 点に 注意 （図 

c)。 

u ベクトル ： 第 2 頂点一 第 I 頂点 V 
v ベクトル ： 第 3 頂点一 第 2 頂点の べク トルの, 
u べク トルとの 直交 成分 



このと き， uv 平面 上での ポ リ ゴ ン 
の 各 頂点の 値 を 求め （図 d)， 
u の 最小値， 最大値 

V の艘小 値， 最大値 を 得る。 

次に， 

u の 最小値 を u の 0 

u の 最大値 を u の 255 

v の 最小値 を v の 0 

v の 最大値 を v の 255 と し， 

こ の UV 座 操での 各 頂点の UV 座摞 を 

得る （図 e)。 


g]d :u の 最小値 u の 最大値 
' の瘕小 储 


V の 最大値 


この結果 得られる， 
図 f のようになる。 


' ビング は 


この 例から わかる よう に， 貼り 
付けられる 画像 は. ポリゴンの 形 
によって， 縦横に 引き伸ばされる。 

また， 第 I 〜第 3 頂点に よって， 
貼り付けられる 方向 が 決定 される 
ため， CAD で 形状 データ を 作成す 
る 際， どの 頂点から 作成す るかが 
非常に 重要と なる。 図 g に， 二の 
例と 同じ ポリゴンに 対し， 頂点の 
順番が 異な つ た 場合の 例 を 記す。 


第 2 頂点 




(0,0) 


(255, 0) 


第 I 頂点 


(0, 255) 



1.0 としてい ます。 ただし， 夕焼けと か 夜と かの 場合 はま 

た 異なる 色 を 設定す るべき でしよ う。 
そ してち よつ と 難しい のが く 距離〉 の データです。 こ 

の く 距離〉 がた と え ば 1000 とすると， 視点 か ら 1000 離れ 
た 物体 は， 物体 独自の 色に 大気の 色が 50% の 割合で 合成 
されます。 では， 2000 離れた 物体 は 100% 大気の 色に なつ 
てし まう かとい うとそう ではなく， 1000 からさ ら に 1000 
離れて いるので， 50% のさら に 50% (つまり 75%) が大 
気の 色と なり， 物体 独自の 色 は 25% になって しまう ので 
す。 ですから， この 値よ り も 視点に 近い 物体 は， あま り 
空気 遠近法の 影響が な く ， この 値の 2 倍よ り も 遠い 物体 
は， かすんで はっき り 見えない といえ ます。 つまり， こ 
の 値が 小さい と スモッグの 濃度が 濃く なる わけです。 図 
2 を 参考に 値 を 決めて く ださい。 

FFE など 使わずに， フレーム ソース を エディ タで 制作 
する パワー ユーザ— のために， フレーム ソースの 書式 を 

記します。 空気 遠近法の データ は， 環境 文 （env 
で 指定 します。 

depth (く 距離〉 く 色〉） 
画像 3 の 例で は， 
env { back ( rgb ( 0.2 0.7 1.0) ) 

depth ( 2500 rgb ( 0.2 0.7 1.0 ) ) 

} 

となって います。 

さて， この 手法に は 意外な メリットが あります。 遠く 
の ほう はか すんで 見えな く なる ので， 背景まで 細かくつ 
く る 必要がない こ とです。 画像 2 では， いちばん 奥の 建 
物 力 ? ， ただの 直方体 （あ る いはた だの 板） である こと が 
すぐ ばれて しまいます 力 5 '， 画像 3 では， なんら 違和感が 
ありません。 大きな 都市 を デザイン する 場合 は， 遠景な 
ど， ビル 街の 影の 形 をした 板 を 1 枚 用意す る だけで よ く 
なります。 

しかし， 手輊に 遠近 感が 強調で きる からといって， か 
たつ ぱ しから 利用す るの はいけ ません。 たとえば， 自分 
の 部屋の 中をシ ミュレ一 卜する のに 使っても 不自然に な 
るば かりです。 もっとも， 自分の 部屋が ドーム 球場より 
広い と 力、 火事で 煙が 充満して いる ところ を 描いて みた 
いという 趣味で したら ご 自由に。 

/マッピング 

大部分の 方が ご存じの こ と と 思います 力す， マ ッ ビング 
と は， 木目 や 大理石の 模様の 画像 データ を 3 次元 物体の 
表面に 貼り付け， リアルな 材質 感を 得る 手法です。 アン 
ケ一 ト でも マッピングの 使用法 を 公開して ほしい という 
要望 をた く さんいた だき ま した。 現在の CGA システムで 
は， マッピング に関する ツールが まったく なく， 操作が 
非常に 難しい ので， 禁じ 手と されて いました が， 本日 こ 
こ に 解禁した いと 思います。 
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理由 は， 今回の パージ ョ ン アップ サービス のために， 

AMAP (自動 マツ ビング ツール） を 制作して いるからで 
す （"制作した からです" と 現在完了 形で 書け ない と こ ろ 
が悲 しいので す が， その へんの 事情 は 「各 読者 通達 事項 j 
の コーナー をご览 ください）。 

従来 マ ッ ビング を 行 う た め に は， どの 画像の ど の 部分 
を どの 方向に どのよ う に 貼り付け るかと いう こと を， 1 
つ ひとつの 面 ご と に 指定 してやる 必要が あ り ま し た。 
AMAP では， ァ ト リ ビュー トと 画像 フ アイ ルの 一覧が 表 
示され ますので， マウスで この ァ ト リ ビュー 卜の 面に は 
この 画像 を 貼り付ける と 指定す る だけで， マッピングに 
必要な 形状 フ アイ ル， ァ トリ ビュー トフ アイ ルを 生成 し 
て くれ …一 る 予定です （よつ 弱い）。 これ さえ あれば， 誰 
にで もお 手軽に マツ ビングが でき るよう になる …一 はず 
です （まだ 試した こ とがない）。 

こんなに 便利な AMAP です 力?， 細かな 指定が なく な 
り， すべて 自動で やって いる 以上， 微妙な 表現が できな 
くな つてい るの も 事実です。 そこで， 今回 は 手 作業で マ 
ッ ビング をす るのに 必要な 情報 を 公開 しましょう。 まず, 
画像 4 (21 ページ） を ご覧 〈ださい。 凶悪な ゴジラの 出 
現によ つて， 帝都 東京が 恐怖の どん底に 叩き落と されて 
いる 雰囲気が よく 伝わって くるでしょう （ゥソ ）。 この 画 
像 （特に ゴジラの 顔な ど） は， 本来 マッピングの 使い方 
と は 異な り ます 力 *， 表現 方法 と し て は 面白い と 思い ま す。 
私 は， 今回 初めて マッピング を 使って みました 力 ? ， この 
画像の 制作が ほんの 数 時間 （大部分 は 2D の 画像 データの 
作成） なのです から， 手 作業で も 意外と 実用 性が あると 
いえる でしよう。 

マッピング を 実行す るた めに 必要な データ は， ァ ト リ 
ビュート ファイルと 形状 フ アイ ルの 2 つに 記述され ます。 
も ち ろん 貼り付ける 画像 ファイル を 用意す る 必要 は あ り 


ます 力?， 作画 時 （REND 実行時） に は， この 画像 を 指定 
する 必要 はな く，/ G ォプシ ョ ンを つける だけで マ ッ ピン 
グが 行われます。 

- 例 REND GOJIRA. FRM * . SUF * . ATR /G 

まず， アト リ ビュー ト ファイルに 記述され るの は 以下 
の 4 つの データです。 

mapwind ( ul vl u2 v2 i 
mapview ( ul vl u2 v2 ) 
mapsize ( ul vl u2 v2 ) 

図 3 MOYOU.PIC 

(0,0) (255,0) 



図 5 マツ ビン グ例 
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今月 は， マニュアル にも 載って いない S 度な 
表現の 特集と いう ことで， ネット 上で 提案され 
た FFE の 応用 例 を 紹介し まし よ う。 

Graphic Gallery の ゥ ネゥネ とした アニメ一 シ 
ヨン を ご覧く ださい。 D5GA 内で 「気色 悪い」 「趣 
味 悪い j と 絶賛され た 代物です。 このような サ 
ィ ン 曲面 や 球な どの 規則的な 形状 を CAD で 制作 
する の は なかなか 面倒な のです が， 実は， この 
形状 データ， なんと FFE で 制作した ものな ので 
す。 

FFE は 従来 フレーム ファイル を 制作す るッ一 
ル として 利用して きました。 しかし， マ 二 ユア 
ルを 読んで みましょう。 ど 二に も フレーム ファ 
ィルの 記述に 関する 部分が ありません。 FFE は， 
¥〜¥ の 数式 を 計算す る だけで， それ 以外のと 
ころに は 何 を 書いても そのまま 出力され ます。 
ですから， フレーム データ を 害けば フ L 厶フ 
アイ ルが 出力され， 形状 データ を 害けば 形状 フ 
アイ ルが 出力され るので す。 もちろん それ 以外 
の ファイル でも， インタプリタ 型の C を 使う 感 


党で なんでも できます。 

簡単な 例と して， 九九の表 を 出力 させて みま 
しょう。 #rep と #endrep の 間 を， x カリ 力、 ら 9 ま 
で 繰り返されます。 ¥〜¥ の 部分が 計算され て 出 
力され ます か ら， 二の ファイル を FFE にかけ ると 
かけ 算の 九九の表が でき る わけです。 
例 九九の表 
@2. 0@ 

#rep( x, I, 9 ) 

¥ I * x, 2* x, 3* x, 4* x, 5* x, 6* 
x, 7*x, 8*x, 9*x ¥ 
#endrep 

Graphic Gallery の サイ ン 曲面 は， 中心からの 半 
径 に対する コ サイン を Z 値と し， 法線ベクトル 
も 計算して， スムース シェーディングが かけら 
れ るよう になって います。 高さ を 決める 関数 f 

(x, y ) を 変えれば いろんな 曲面 を 表現で き 
るでしょう。 今回の サイン 曲面の リスト は， 掲 
載す ると 大きくな りすぎ ますので， ご 希望の 方 
はネッ 卜に アクセスして くださ い。 


さて， 今月の アップ データ はかまた デザイン 
の ビッグ ウィンドウ ワゴンです。 今なら ビーチ 
パラ ソルと ビキニ GAL もつ いてきます。 

今年の 春の 「見 体験 フェア」 で， 自動車 メー 
カーの デザイナーの 方から， ' '新車の プ レゼ ンテ 
—シ ヨンに 使える だろう か" という S 問 を 受け， 
' '努力 すれば できない ことはないでしょう" と 
いいかげんに 答えました。 大阪に 戻って から 本 
当に そんな 本格的な 使い方が 可能だろう かと 心 
配に なって， 自分で 制作して みたの が この ヮゴ 
ン です。 ですから， 15 秒の CM 風の アニメ一 ショ 
ン になって います。 形状 デザイン も 3 時間 程度 
です し， CM の 完成 度もプ レゼ ンテ一 シ ョ ン 用に 
は 十分な デキで そこそこ 満足して います。 

ところで， この GAL (名 は LUNNA と 申します） 
は 平面で できて いますが， こういった 表現 もな 
かな か 面白い と 思います。 制作 も 楽です し， へ 
たに 3D で 作って 不気味な アンド ロイ ド となる 
よ リ はィ ラス ト チックな 仕上がり になります。 
皆さん も かわいがって やってく ださい。 
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colormap (く 画像 フ アイ ル 名〉） 
colormap で 貼 り 付け る 画像 ファイル を 指定す ると い 
うの は 容易に 予想で き ます 力-:, ほかの 3 つ は さっぱり わ 
からないでしょう。 ここで はとり あえず， ただ 単純に 
256X256 ド ッ ト の 画像 を 貼 り 付け る 設定と し て， 

mapwind ( 0 0 255 255 ) 

mapview ( 0 0 255 255 ) 

mapsize ( 0 0 255 255 ) 
と いう 値 を 入れて おき ましょう。 まず 最初の 注意と して, 
これら 4 つの データ はァ トリ ビュー トフ アイ ルの 中で 1 
度 記述 すれば よいので はな く ， RGB の 指定と 同様に 各ァ 
ト リ ビュー ト ご と に 必要で あ る こ 丄 を 理解 し て く ださ い。 
. 例 GOJIRA. ATR 

atr dou { col ( rgb ( 1 1 1 ) ) 
amb ( 0. 5 ) 
dif ( 0.5 ) 

mapwind ( 0 0 255 255 ) 
mapview ( 0 0 255 255 ) 
mapsize ( 0 0 255 255 ) 
colormap ( MOYOU. PIC ) 

こ の 例 は， ゴジラの 胴体 部分に， 図 3 のよう な 模様 
(MOYOU. PIC) を 貼 り 付け ようとし ています。 tra (透 
過 率） や spc (ス ぺキ ユラ 一） を 省略して います 力 f ， 特に 
意味はありません。 ちゃんと 指定して やれば， マツ ピン 
グ& 半透明 も 可能です し， も ち ろん amb, dif, spc の 与え 
方で 陰影が 変わる の はいつ も と 同じです。 

特に 注目 力 5 ' 必要な の は col です。 rgb が （ 1,1,1 ) つま り 
真っ白に なって います 力す， よ 〈考える と その ポリ ゴンの 
色 は 貼り付ける 画像の 色になる はずです。 ですから， 画 
用紙が 白い のと 同じ 理由で， その 面の 色 は 文字 どお り ft 
紙の 状態に してお く わけです。 こ こで 何 か 色 をつ けて お 


く と， 色 画用紙の 上に 絵 を 描く ように 色が 混じって しま 
います。 正確に いう と， R, G, B ご と に and を 取り ますの 
で， 赤い ポリゴンの 上に 青い 画像 を マッピング する と， 
真っ黒に なって しま う （1X0 = 0) わけです。 貼り付ける 
模様 を 白と 黒 だけで 描いて， 赤い 面， 青い 面に マツ ピン 
グし， 赤い ゴジラ， 青い ゴジラ を 作る！： いう 使い方 もで 
きます。 し 力' し， 赤， 青の 模様の 画像 を 用意す る ほうが 
わかりやす いので， マッピング を するとき は， 無条件で 
A にす る と 党え ておいて まず 問題 はないで しょ う。 

次に 形状 ファ ィ ル です。 CGA シス テムで 扱 う 形状 デー 
タ はポ リ ゴン です が， 実は この ポ リ ゴン にも 4 種類が あ 
り ます。 

poly ： 通常の ポリゴン データ 

shade ： スムース シェーディングが できる テ"一 
タ 

uvshade ： マッピングと スムース シ エーディ ング 

がで き る データ 
uvpoly ： マツ ピン グ がで き る デー タ 

poly は， 各項 点の 3 次元 座標 （x， y, z) の 値が 羅列 し て 
いる だけの もっとも 基本的な データです。 逆にい う と， 
poly 以外の デー タ は， REND 以外の ほとんどの プロ グラ 
ムが 対応して いないので， た と えば MIRR にかけ て， 左右 
反転す るな どと いった こと はで きません。 

shade は， CAD で スムース シ エーディ ングを 力' ける と 
生成され る データです。 3 次元 座標の ほかに， 各項 点で 
の 法線べ ク ト ルが 必要 となります 力 f , こ の 法線べ ク ト ル 
を エディ タ で-り-え るの は， よほど 単純な 形状で ない 限り 
入 問 技で は あ り ません。 CAD のシ エーディ ングの 機能 は 
バグが ある ま まです し， 操作 性 も 悪い ので 使い ものに な 
り ません。 これ も AMAP が 完成して から 使える データ と 
いえる でしよう。 

uvshade は， スムース シェ一 ディ ングと マッピング を 



cga コンテ ス 卜の ビデオ 配布 は 予定よ リ 早く 

発送して きたので， D5GA も 発送に « れ てきた 

ん だな あ'' と 油断して いる ユーザーの 皆さん， 
ご 安心く ださい。 バージョンアップ サービス は, 
しっかり 遅れる 予定です。 
実は， せっかくの バ一 ジョン アップな の だか 

ら， 夏休みで 余裕 も ある 二と だし I , 2 回生の 

修行 も 兼ねて， もう 少し いろんな ツール を 制作 
しょうと いう ことにな つたので す。 画像 データ 
の 左右 を 反転させる というよ うな， 非常に 簡単 
な ものから， マツ ビング や スムース シェ一 ディ 
ングの データ を 簡単に 生成す る と いう パワフル 
な もの ま で 各種 制作 中です。 

以下， 制作 中の プログラムと プログラマ を紹 
介いた します。 もし， パージ ヨン アップの ディ 
スクに その プログラムが 入って いなければ， 誰 
が 落と したの かひと めで わかる さら し 者の コー 


各 読者 通達 事項 

〈バージョンアップ サービス 遅れる!〉 

ナ一 です。 

* 

AMAP ： アヤ シゲ 守虽 …… スムース シェ一 ディ 

ング， マツ ビング 用 データ 生成 ツール 

• 難易度 No. I 頭 を 抱えながら も 果敢に 制作 

中 

REP ： 教育的 寺 田 …… 画像 データの 色 を 置換 

したり， 透明 ビットの 裸 作が できる 
，すでに 稼動 中。 なかなか 実用 性が 高い と 好 
抨 

WIRE ： GAVANAffl …… ワイヤー フレー 厶ァ 

二 メ一シ ョ ン 

• 先日 パイクで 事故り， 包帯 まき まきに て， 
落とす 候補 No. I ！ 
MFONT ： 岩室 …… 文字 データ を 形状 データに 
変換す る 

'アルゴリズム もま だ 考えて いない。 これで 


はたして 完成す るか？ 

HEDRO ： 小 立 正多面体 作成 ツール 

• 楽勝。 もう 完成した から， マツ ビング 対応 
検討 中 

WIPER ： 中 田 …… シーンの つなぎ目の ヮ イブ 
効果 生成 ツール 

• 結構 マン マシン インタフェイスが たいへん。 
完成 危ぶまれる 
BW ： 中 西 '-… 画像 データ を 白黒に 2 値 化する 
• 楽勝 ！ だけど プログラム 経験 0 の 初心者。 
大丈夫だろう か 
TURNS ： 不明 …… 画像 データの 左お を裹 返し 
にす る 

SEPIA: 不明 …… 回想 シーン 用に， カラ一 画像 
を 白黒， セピア 調に 変換す る 
• 上級生が やれば I 日で できる。 新入生の だ 
れ かに やらせよ う 
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兼ね備えた も ので， 3 次元 座標， 法線べ ク ト ル， uv 座標 
の すべてが 必要と なります。 しかし， 法線ベクトル を 求 
め るの が 人間 技で はない 以上， こ の データ も 手 作業で 扱 
うわけ に はいき ま せん。 

という わ けで， uvpoly が 今回の メ インと なります。 通 
常の poly の データ と比べてみ ましょう。 
• 例 [poly] GOJIRA. SUF 
atr dou 

prim poly ( 50 —50 250 
50 50 250 
50 100 0 • 
50 -100 0 ) 
- 例 [uvpoly] GOJIRA. SUF 

atr dou 

prim uvpoly ( 50 —50 250 0 0 

50 50 250 255 0 
50 100 0 255 255 
50 -100 0 0 255 ) 

ま ず， prim poly を prim uvpoly に 置換 します。 ひとつ 
の 形状 デー タ の な かで， poly と uvpoly が 混在 していても 
問題 あり ません から， マッピングしたい ポリ ゴン だけ 行 
つてく ださい。 次に， 各項 点の 座標 値 x， y, z の 後ろ 
に uv 座標 を 与えます '…- 。 と ころで いま まで はぐら かし 
てい まし たが uv 座標つ てなん でしよ う 力'。 

uv 座標 は， 貼り付ける 画像の 座標です。 一般で は， 3D 
の 座標 は x, y, z で， 2D の 座標 は x, y を 使います 
が, マ ッ ビングの よ う に 3D と 2D の 両方 を 同時に 扱う 場 
合， x 座標と いっても どっち かわから なくなって しまい 
ます。 ですから， u は 貼り付ける 画像の x 座標， v は y 


座標の こ と なのです。 

つまり， 形状 データの 各項 点に uv 座標 を 与える という 
の は， 各項 点に 画像 データの どの ドッ 卜が 対応す るか を， 
いちいち 措定して やる こ と' なのです。 上記の 例の ァ ト リ 
ビュートと 形状 デー タ で 作画 させる と 図 5 のように なり 
ます。 このように， 貼 り 付け る 画像が 長方形で， 3D のポ 
リ ゴンが 台形だった 場合， 模様 は ボリ ゴンの 形に 応じて 
引き伸ばされる わけです。 

以上が マ ッ ピ ン グの 基礎です。 なんとい つても uv 座標 
を 与える のが 大変な ので， AMAP を 使用せ ず 全部 手 作業 
で 行 う ので したら， ボ リ ゴン は [几 1 角 形 か 三角形に と ど め 
てお く 必要が あり ます。 


I 


続 マッピング 


基礎 編で 今回 は 終わ ろ う と 思つ て いたのです 力 f , そ れ 
で は AMAP と 大差ない ので 実用 編 を 続けます。 少しずつ 
難し く なって き ますので， がんばつ てついて きて く ださ 

まず， 三角形です。 uv 座標の 設定が 問題です が， ゴジ 
ラ が 襲つ ている 束 京タヮ 一の 例で 解説す ると 図 6 のよう 
に な ります。 タ ヮ 一の てっぺんの uv 座標が 問題です。 
• 例 TOWER. SUF 
obj suf tower \ 
atr tower 

prim uvpoly ( 0 0 500 127 0 
200 0 0 0 255 
一 200 0 0 255 255) 

} 


柚 姫 

の 

明 

る Bffii 


談室 


暑い …… 。 ごめんね， いきなり 暑苦しい セリ 
フで。 姫 は 夏より 冬が 好きな もので， 暑さに 姫 
の 頭 はすつ かり 溶けて ます。 数学の テストが ひ 
ど いのも， 英語の 出席日数が 危う いのも みんな 
この 暑さが …… と， つい 悪い こと は 全部 夏の せ 
いにした くな るんで すよ。 けど， お便り もき て 
いる こと だしがん ばって やろう かな あ。 

(早速お 便 り を もらって うれしい 姫） 

Q ： I 力 月 ほど 前に， コンテストの ビデオのお 
金 を 郵便振替で 払った のです が， まだ 届き ませ 
ん。 もし， この あと まだ やる ことがあ るんだ つ 
たら， 教えて く ださい。 

娘： 最近， CGA システム， ビデオ， パ一 ジョン ァ 
ッブ そして 追加 カンパな ど いろいろな 名目で 
D5GA の 口座に 振り込んで いただい ています。 で 
すから， 何が 目的で 振り込んだ のか を 明記して 
おかないと， 不精な 担当者が みんな 追加 カンパ 
と 見なして しま う 恐れが あり ますので ご-; 主意く 
ださい。 それから， お 名前と 連絡先 （霜 話） も 
お忘れな く 。 

(名な しの 苦情 ハガキ を 手に 途方に暮れる 姫） 


Q ： CGA コ ン テス 卜の ビデオの カンパ を 払つ て 
な いんです が， どう すれば いいで しょうか。 
姫： あくまで カンパと いう ことです ので， 気 に 
する ことはありません。 もし 送って くれる のな 
ら， 締め切りはありません のでお 金と 暇の ある 
ときに いつでも どうぞ。 カンパ はお 金で も 物で 
も， もちろん 肉体労働 でも 歓迎し ます。 ちなみ 
にい ま までに 届いた カンパの一 端 を 披露し ます 
と， サニ一 レタス | 箱， ササ ニシキ | 袋， ハ一 
ド ディスク I コ， なぞの 飲料水 I ケース …… な 
どな ど。 

(お金の ほうがいい ぞ という 会計係 を 無視す る 
姫） 

Q: 柚 姫と あき 姫， どちらが かわいいで すか？ 
姫： 世の中， 見なき やよ かった， 知ら なきやよ 
かった という 二と は 多々 ある ものです。 ど一 し 
てもとい うのなら 大阪 まで 会いに きて くれても 
いいです けどね。 

(二ん な お 便 り 載せ なきやよ かった と 思う 姫） 
Q ： バ一ジ ヨン アツ プ サービス 申 し 込みます。 
ところで カンパ はこの ハガキ （カモ メール） で 
当たる 赏品 というの はいかが でしよ う ？ 


姫 ： バ一 ジョン アップ サービスで 送る ディスク 
に プログラムが 入って いたら 当たり， 入って い 
なかったら 残念です が， 次の チャンス を 待って 
て く ださい。 

( し よ せん 人生 はバ クチ だ と 思う 姫） 
Q: D5GA の メイン スタッフの 方々 は 京大 or 阪 
大生 だそう です が， どう すれば 京大 or 阪大に 入 
れ るでしょう か （Oh!X つて， 受験 雑誌で しょ 
う ？）。 

姫： 京大に 入る に は 語学と して， 英語の ほかに 
京 言葉の 試験が あります。 また 阪大に 入る に は 
実技と して 漫才が 課せられます。 がんばって 大 
阪の ボケと つっこみ を 勉強して く ださい。 

(実技 は 満点だった 姫） 
Q ： 忙しく て CGA を 制作す る 時間が なかなか 取 
れな いのです が， 皆さん は どのよう にして 時間 
を 作られて いるので しょ うか？ 
姫 ： あなたの 周 り に 灰色の 服 を 着た 男た ちがい 
ません か。 そうです， D5GA では， 活動の 合間に 
「時間 銀行」 の 経営 も 行って いるので す。 

(映画 版 「モモ」 の 笑顔が 好きな 姫） 
お 手紙お 待ちして ます ！ 
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ちなみに これ を 図 7 のよう な 11 角 形に すると， 途中の 
点の uv 座標 を 求める の 力 f , 非常に 面倒に なって し まう わ 
けです。 ポリ ゴンの 大きさ を， 縦横 256 にす ると， ポリ 
ゴンの 3D 座標 と 画像 デー タ の uv 座標が 一致 し て， 簡単に 
求める こと がで き ま す 力、 制限が 多 く あまり 実用的で は 
あ り ません。 

次に ゴジラの 顔です。 この場合， ゴジラの 顔の 画像 フ 
アイ ルが 256X256 で 横長な のに 対して マッピング する 
ポリ ゴンが 正方形な ので， そのまま やる と 横 方向が 縮め 
ら れて， 面長で かつ 左右に 黒の 余白が できて しまいます。 
これ を 解決す る 方法 は 3 通り あり ます。 

まず ひとつめ は， ゴジラの 画像 を 描 〈とき 左右 いっぱ 
いまで 使った 横長に ひしゃげ た 顔に してお 〈方法です。 
これ だと 形状 ファイル， ァ 卜 リ ビュー ト ファイル を 書き 
換える 必要 は あ り ません 力 5 ', 描き に く いのは 事実です。 

次 は， 形状 フ アイ ルの uv 座標 を 修正す る 方法です。 uv 
座標 は， 貼り付けたい 画像の 位置です ので， 画像の 隅で 
ある 必要 はない わけです。 
• 例 GOJIRA. SUF 
atr kao 

prim uvpoly ( 140 60 250 40 0 
140 一 60 250 215 0 
140 -60 370 215 255 
140 60 370 40 255 ) 
そ し て 最後 はァ ト リ ビュー トフ アイ ルを 修正す る 方法 


です。 

mapwmd ( ul vl u2 v2 ) 
こ の mapwind は， 貼 り 付け る 画像 ファ ィ ルの 有効 範^ 
を 設定して います。 ですから， 

mapwind ( 0 0 255 255 ) 
と す れば， 256 x 256 の 画 fife ファイルの 隅から隅まで を マ 
ッ ビングの 対象 とする ことになります。 今回の 場合， 貼 
り 付けた いのは， (40, 0)~(215, 255) なので， 

mapwind ( 40 0 215 255 ) 
と します （mapview, mapsize は 変更し ない）。 このよう 
な mapwind の 使い方 は， よく あるでしょう。 たとえ 
ば， お 絵描き ソフ 卜で, 木目 模様 を 描 こ う と したが, 256X 
256 の 大き さ に 描く の は 面倒で， 真ん中 辺に 小さ く 描いて 
しまった というと き も， その 部分 だけ を マッピングの 対 
象に すれば 問題 あ り ま せん。 ただ， あまり 貼り 付ける 画 
像 データが 小さい と， 大きな ボリ ゴンに マッピングした 
際， ドッ 卜の 粗 さが 露骨に 出て し ま う 場合が あ り ます。 
また， 貼り付ける 画像と して， 512X512 の 画像 フ アイ 
ルを 使いたい 場合 （メモリ はたく さん 消費し ます）， 

mapwind ( 0 0 511 511 ) 
のよう に 設定し なければ いけません。 

し 力' し， mapwind で 512 までの 範囲 を 指定して いる 
のに， そ の 画像が 256X256 の 画像 ファ ィ ル だつ た 場合， 
「ウィンドウ の 指定が 不正です」 と エラーに なって しま 
います。 


図 6 TOWER. SUF 


図 9 ひしゃげ させた 場合 




図 B ゴジラの 顔 （基本） 


図 11 アトリビュート ファイル を 修正す る 場合 
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さ ら に， 応用 編 として 次の よう な 特殊効果 もで きま す。 
いま ま での 例で は， 貼 り 付け る 画像が ゆがんだ りしない 

ように， 矛盾の ない UV データ を 与えて いました。 そこで 

今度 は， わざと 変な データ を 与えましょう。 

'例 BUIL.SUF 
obj suf buil { 
atr buil 

prim uvpoly ( 0 —100 300 0 0 
0 100 300 255 0 
0 100 0 255 0 
0 -100 0 0 255 ) 

1 

こ の 例で は， ポ リ ゴンの 2 つの 項 点が 同一の uv 座標 を 
持って います。 その 結果， 画像 ファイルの 一部が 引き伸 
ばされ て， ゆがんで マッピング されます。 この 性質 を 利 
用す ると， ゴジラの 放射能 火炎に よって 半分 溶かされた 
ビル を 表現で き ます。 

さらに， 対応す る uv 座標が ね じれる ように マッピング 
すると， も う 予想 もで き ない よ う な 絵に な り ます。 
• 例 TEST. SUF 

prim uvpoly ( 0 -250 500 0 0 

0 250 500 255 255 
0 250 0 255 0 
0 -250 0 0 255 ) 

こんなね じ 曲がつ た マツ ピン グの 仕方， どのよう なと 
図 12 マッピングの ための 木目 模様の 例 



図 13 ゆがみ を 利用した 場合 （その I ) 


き に 役に立つ かとい えば， たぶん なんの 役に も 立たない 
でしよう。 面白い から 紹介して みた だけです …… 。 

さて， あんま り いいかげんな こ と を 書いて いる と 怒ら 
れそ う なので， 実用 性の ある 使い方 を 紹介し ましょう。 
ァ ト リ ビュー 卜の データ は 標準 どお り， （ 0 0 255 255 ) 
のとき， 形状 デー タ の uv 座標 を 255 よ り 大き な fift に し て 
みます。 


例 TEST.SUF 

prim uvpoly ( 


-250 500 

250 500 

250 0 

-250 0 


0 0 
511 0 
511 511 

0 511 ) 


こ の 例で は 縦横 2 倍の 値に しました。 すると， 貼り 付 
け る 画像の 模様が 縦横 2 個ず つ 並んだ 絵が で き ま す。 511 
を 400 にす る と ， 縦横に 1 個 半 並んだ 絵に な り ま す。 

つまり， uv 座標 というの は， 0 ~255 であ る 必要性 は 
まったく ありま せん。 uvffi 標は， 貼 り 付け る 画像が， 縦 
横に 無限に 繰 り 返されて いるもの なのです。 

た と え ば， 大理石の 模様 を 貼 り 付ける 場合， 小さな ポ 
リ ゴン と 大きな ボ リ ゴンの 両方に 同じ マツ ビング を して 
いて は， きめ 細か さが 異なって， 不自然に なって しまい 
ます。 大き な ポリ ゴン は， それに 比例 し て uv 座標 を 大き 
くして や れば， 大理石の 模様が 連続 して， きめ 細か さ を 
一定に する ことができます。 ただこの 場合， 連続しても 
模様の 境目が 目立たない よ うな 画像 ファイル をつ く つて 
やる 必要が あ り ます。 

以上が 形状 デー タ の uv 座標の 応用です。 そ れ では-最後 
に， ァ トリ ビュー トの 中で 無視され ていた mapview, 
mapsize について 解説し ましょう。 まず， 

mapview ( ul vl u2 v2 ) 
です 力 f , これ は 気にしないで ください。 本来 はちゃん と 
し た 意味が あ る のです 力 f , REND では 手を抜いて 無視 し 
ています。 （ ul vl u2 v2 ) に は， と り あえず mapsize と 

図 15 マッピング 利用 例 




512 の 場合 


図 14 ゆがみ を 利用した 場合 （その 2 ) 


図 16 図 15 の 応用 
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同じ 値 を 入れて く ださ い。 ほかの 値 を 入れて も なんの 変 

化 もありません 力' ; ， mapview 自体 を 省略す ると， 偉そう 
に r マッピング データが おかしい」 と 文句 をい つてき ま す, 
次に， 

mapsize ( ul vl u2 v2 ) 
です が， これ は uv 座標の 目盛りの 付け 方 を 設定して いま 
す。 すでに 解説した mapwind は 貼り付ける 画像の 有効 
範囲 を 指定 してい ますが， こ の 時点で は uv 座標が 設定 さ 
れた 訳で は あ りません。 この mapsize によって， 貼り付 
け る 画像の 左上 隅の uv 座標 と ， 右下 隅の uv 座標 を 指定す 
る ことによって， uv 座標 全体が 定義され るので す。 
• 例 TEST. ATR 

mapsize ( 100 200 300 400 ) 
TEST. SUF 
prim uvpoly ( 0 —250 500 0 0 

0 250 500 256 0 
0 250 0 256 256 
0 -250 0 0 256 ) 

この 例で は， 貼り付ける 画像の 左上 隅が （100,200), 
右下が (300， 400) と いう 座標に な り， uv 座標の 原点 （0,0) 
の 位置 も 大き 〈変わって しまいます。 uv 座標系が 変わる 
のです か ら ， 形状 デー タ の uv 座標 も それに 応じ た 値に す 
る 点に ご注意く ださい。 

この mapsize の 使い方 は 2 通りあります。 まず ひとつ 
め は， uv 座標 を 正規 座標系で 記述す る こ と です。 
• 例 TEST. ATR 

mapsize (00 11) 
TEST. SUF 
prim uvpoly ( 0 —250 500 0 0 

0 250 500 1 0 
0 250 0 11 
0 —250 0 01) 

図 17 mapsize と mapwind の 関係 


20^ 



図 18 mapsize の 使い方 （反転 例） 
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このように すると， UV 座標 を 生成す る プログラム を 制 

作す る 場合な ど 楽になる ケースが 多く， また， 上記の よ 

う に， 形状 データの UV 座標が 美 し く 記述で き ま す。 

も う ひとつの 使い方 は， mapsize の 値 を 変える だけで， 
上下 左右 を 反転す る こ とです。 
• 例 上下 反転 

mapsize ( 0 255 255 0 ) 
左右 反転 

mapsize ( 255 0 0 255 ) 
上下 左右 反転 
mapsize ( 255 255 0 0 ) 
以上が マ ッ ビングに 関する テクニックです。 今回 用い 
た 貼り付け 用の 画像 は， ゴジラの 顔から テス ト パターン 
まで， すべて Z'sSTAFF で 描き ま した （Z'sSTAFF の 画 
像 データの ま ま では 使用で き ま せん。 バー ジョン アップ 
サービス に 1 [寸 いて く る ツールに よって， CGA システムの 
画像 データに 変換して います）。 マッピング する と きかな 
り ゆがみ ますので， きつち り した 絵よ り 少し ぼやけた よ 
う な 絵の ほうが 仕上がり はきれ いです。 文字 を 描いた よ 
う な 画像 データ を 貼 り 付けても， ほ とん ど 読め ません。 
Z'sSTAFF で 描いた 絵 だけでなく， CGA システムの 3D 
の 画像 を マッピング する こ とで， 面白い 効果が 出せる よ 
うな 気 もします ので， 皆さん も いろいろ やって みて く ださい。 

,ぉ わりに 

アンケート を 集計して おります と， "もっと 具体的に" 
と 力'， "図 を 用いて 解説して ほしい" という ご 意見が かな 
り ある ことに 気がつきました。 そこで 今回 は， できる だ 
け 図 を 用意し 具体的に ファイルの リ ス ト も 掲載す るよ う 
にじま した。 少し はわ かりやす く なった と は 思います 力 f ， 
紙面の 都合 上， 本文の 量が 減り， 内容 的に は 物足りない 
ような 気がします （というより， マッピングの 解説に 手 
間 取つ てし まった）。 表現 を 増す テクニック は， ま だ ま だ 
あります ので， 今回 掲載で きなかった 分に ついては， ま 
た 次の 機会に 回したい と 思います。 皆さん も， 何 か 面白 
い アイデアが ありましたら， ぜひお 便り ください。 

今回 公開され た テクニック はあく まで 道具です ので， 
目的に なって しまわな いよう にご 注意く ださい。 意味 も 
な く ， 映り 込み や 空気 逮近法 を 用いた 力 ッ ト を 作って い 
て も， 作品に はなり ません。 空気 遠近法 は 現在 制作 中の 
作品の 中で， グラ ン ド キヤ 二 オンの 壮大 感を 出す ために 
設けられた 機能です。 これらの テクニック は， あくまで 
も 作品 制作の な かで 生か し て く ださ い。 

さて， このところ 隔月 連載と なって います 力す， 来月 は 
今月 大阪で 開かれ ま した ある ィ ベン 卜の レポ 一 ト を 少し 
だけ 行う 予定です。 そして 再来月で は， やっぱり 使えな 
い 入の ために， MAX 田 口 君が 1 " 宇宙 要塞 CAD の 逆襲」 を 
お送り します。 お楽しみに。 
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先月 W 載した アンチ エリア シン グ 付き 描 

|W| 関数 は， 標準の グラ フ ィ ッ ク IM1 数に 比べ 
れば大 き な 可能性 を 持って はいる 力 s , なん 
といっても 使いに くい。 あの ままで は， 機 
能 は ともかく， 操作 性 は 従来の グラ フ ィ ッ 
ク 関数 か ら 一歩 も 進化して いない。 

サンプルで 載つ けた 女の子の （よ う な） 
顔 は 僕が 作つ た も の だ。 あんな 使いに く l 、 
もの を 誰かに 使わせる よ う な 仕打ち はさす 
がに できなかった。 で， 方眼紙に 下絵 を 描 
いて ぼちぼちと ゆ: 標を打 ち 込んで いったの 
であ る 。 おお， こ れ では ま る で 入 間 デジ タ 
ィザ ではない 力'。 まったく 最低であった。 
そ して できあがつ た 絵 は どうかと いう と ご 
紫のと おり。 よくいえば シンプル， 率直に 
いえば 描き 込みが 足りない 絵。 もちろん 根 
気が 続か なかった せいで ある。 僕の 画才 な 
どた かがしれ ている も の だが， そ れで も ド 
絵の ほうが ま だ ま し な 絵 だつ た （と自 分で 
は 思って いる）。 

しかし， この 方式の いいと ころ は， いつ 
たん 輪郭の デー タを 作って しまえ ば あ と は 
極楽と いう 点に 尽きる であろう。 髮の毛 を 
どんな 色に しょうと， スクリーントーンに 
しょうと 自由。 髮の毛 を 少し ずら して スク 
リーン トーンに して 貼 れば 影の ような 効來 
も 出せる。 わずかな 時間で アンチ エリアス 
のかかった 絵 を 何枚で も 作れる。 手 を 変え 
品 を 変えして， いろんな 絵 を 堪能で きた。 
そ れ に比べ て 前半の 作業 は 地獄 地獄。 

そ こ で 思 つ た 。 ifti 倒 な こと は 計算機 ( 二 や 
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ら せて しまえ と。 わが X68000 に は マウス と 
いう 強力な ボ イン ティン グ デバ' ィ ス 力 f 標準 
装備され ている ではない 力'。 I 坐標 をと るの 
さえ 簡単に なれば， もう 少し まし な 絵が 描 
ける かもしれ ない。 さらに はもつ とたく さ 
んの 人に も 使って もらえる かもしれ ない と。 

さて 今回 は 

今回 は 面倒 な 人 問 デ ジ タ ィ ズの 作業 を 計 
算 機に W 代わ りさせる こと をた くらむ こと 
にす る。 マウスで 点 を ポイント すれば， あ 
と は プログラムの ほう で 必要 な データ を 計 

算 してく れる。 要するに グラフ ィ ッ クェデ 
ィ タだ。 

といっても， 見 惯れた グラフィック ェデ 
イタと は 少し 違う。 どちら かとい えば ドロ 
—系の ツール だ。 点 をつな いでいって 絵 を 
作る。 途中の 点 を ちょっとず らしたり， ひ 
と 通り 描いた あ と に 線の 太 さ を 変えた り と 
いった こ とが 自在に できる わけ だ。 

最後 に BASIC の描囤 プロ グラム を 出す 
ようにし ておけば， 色 を 変えて みたり， 塗 
りつぶ してみ たり， スクリーントーン にし 
てみ た り といった 楽しい 作業 だけが 待って 
い る。 いって みれば 作業の: f: い 部分 は 計算 
機に 押しつけて， おいしい 部分 だけ を 人間 
様が かつ さらおう という 魂胆な ので あ る 。 
名 づけて 点 列 エディ タ。 

使い方の 前に 作り方 

前回に 味 を し め， X - BASIC の 外部 関数 を 
作る こ と にした。 ただ 描 iWi|iy& が liii よ り も 
少ない ので， 今回 も 採用した 分割 コンパ ィ 
ルが 面倒な 作業に 感 じられ るか もし れ ない。 

点 列 エディ タには テキス ト 画面に 線 を 引 
くた めの 関数 を 使う。 線分お よ び 点 列 を テ 
キス ト 画面に 描く 関数で， 前 |»1 の anti.fnc 
と ペアで BASIC に 組み込んで 使う。 その 
名 も tline.fnc。 

コンパ ィ ルの 要領 は 前回 と 同じで ある。 


本格的な CG に は 1600 万 色が 必要 T 5 アナ 
ログ R G B 画像が 持つ 可能性 を 過小評価し 
てはいな いか？ 1 これまで あまりに も 古い 
概念に 縛られて いたよう な 気 はしない か 7 
オーバー サンプリングと 菜 野式ァ ルゴ リズ 
ムが 導く 2D グラフ ィ ックの 世界 を 見よ。 
2D の 可能性 を さらに 追ってみ よう。 

環境 も 前 回と 同 じ で 構 わない。 以' m け 足 
で 説明す る。 次の リスト を テキスト ェデ ィ 
タで 打ち込む。 

- tline.s (外部 閼数 ヘッダ) 
- anti.h (マクロ 定義 ファイル） 
• main.c (引数 リスト 宣言） 

これらの うち， 
- anti.h (マクロ 定義 ファイル） 
- main.c (31 数 リスト 宣言） 
の 2 つ は 前回の ものと M じ であ る 。 

打ち込んだら， それぞれ を コンパイルお 
よ び アセンブル する。 つまり， 

as /u ~.s 

cc /L ~.c 

gcc — c ~.c 
のように する。 詳しく は 前回の 説明 を ご II 
いただきたい。 
最後に リンク フェイズ。 

lk /o thne.mc thne.o main.o time 
s.o%lib%¥clib.a(%lib %¥gnulib.a) %lib% 
baslib.a 

あ と は X- BASIC に 組み込んで 起動 すれ 
ばよ い。 ま ず BASIC ディ レクト リ に， い 
ま 作った 外部 関数 を 転送す る。 
copy tune.fnc a:basic2 

それから BASIC ディ レクト リ 上の コンフ 
ィギ ユレ一 シ ヨン ファイル （標準で は bask, 
cnf ) を 書き換える。 た と えば， 


FREE 

= 128 

WIDTH 

= 64 

BEEP 

= ON 

CAPS 

= OFF 

FUNC 

= GRAPH 

FUNC 

= MOUSE 

FUNC 

= PIC 

FUNC 

= ANTI 

FUNC 

= TLINE 


のように する。 今 w の 点 列ェデ イタに は， 

マウス 関係の 関数 を 使って いるので， mo 
use.fnc も 忘れずに 組み込んで おく こ と。 
な お， 打ち込んで ちゃ んと 動く ように な 
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つたら フ アイ ル 入出力の 前後に ERROR 
ON/OFF を 加えて おいて ほしい。 

先月の フォロー 

ここで ちょっとし た 拡張 を してお こう。 
先月の 自由 曲線の プログラム （pts— curv 
e.c) 中に， 単位 ベクトル 化する 関数 nor 
malize ( ) があった が, それに 次の よ う に 
1 行 付け加えて コンパイルし 直して おく こ 
と をす すめる。 別に バグと いう わけで はな 
いの だが， この 変更 をして おく と， 点列ェ 
ディ タ でち よつ とし た 技が 使え るよう にな 
る。 それ は あ とのお 楽しみ。 

voia normalize^!, v2) 

vector vl, v2; 

{ 

double 1; 
I=length(vl) ； 

if (Kl.Ge-iO) 1=1.0; —この 1 行 
v2[0]=vl [0]/l; 
v2[0]=vl [0]/l; 
return; 

} 

こ れは， 表面的に は 零べ ク ト ルの 処理 を 
きちんと すると いう だけの 意味し か 持た な 
いが， 実は 曲線の 表現力 を 若干 (かなり ？） 
上げる 効果が あ る ので ある。 そ れ はおい お 
図 1 点の 重ね 打ち 


'説明す る こ とになる であろう。 


点 列 エディタ 使用 上の 注意 



2) 直線と 曲線の 同居 



さて BASIC が 立ち上がったら， さつ そ 
く 点 列 エディ タを 打ち込ん で^らせよ う。 
BASIC のリ ス ト と して はや や 長め だが， 
行 番号 を 使い そ う な 命令 は 避けて あるので 
行 番号 抜きの リスト を， 使い慣れた テキス 
卜 エディ タで 入力 してから load® 命令で 
読ませて も いい。 

キー ボー ドと マウ ス 併用で あ る。 キ 一操 
作 は 表 1 に 示す。 はっきり いって， 機能 も 
表に 書いて ある こ と その ま まで ある。 操作 
について は そのう ちに 惯れて く るだろう 力' 
ら， ここで は， 特に 気をつけるべき こと や 
ちょっと した テクニック を 書いて おこ う。 
'マウス を 觔 かすと， ラバー バンド を 引つ 
張り はする 力 ? ， それだけ で は 点 の 座標 は 確 
定 し な い。 た と え ば， こ の 時点で な に 力' 
キー を 押す と ラパー パン ドは キャンセル さ 
れる。 その 点 は， マウスの 左 ボタン をク 
リックして 初めて 確定す る。 確定 し た 点 と 
未? ！ま 定の点 （ラパー バンド 上の 点） は 色が 
違う のです ぐに わかる。 
• 点 列の 終点 を 編集して いる と き に左ク リ 
ック すると， すぐに 次の 点 を 作って ラバー 
バンドに 乗せる。 対して， 点 列の 途中の 点 • 

表 1 点 列 エディタの コマンド 


を 編集して いる と きに 左クリ ック すると， 
そ の 点の 位置が 変わる だけで 新 し い 点 はで 
きない。 こうした ほうが 自然な 操作 感 党が 
得られる であろう。 点 列の 途中 に 新 し く 点 
を 作りたい 場合 は i (insert- point) キー を 
使う。 

• どうしても 角 （かど） の ある 曲線 を 描き 
たい 場合が 出て き た 場合の 処置 は 次の よ う 
にす る。 1 力 所に 点 を 2 度 打つ ので ある。 
プログラム 上， 1出 線 はこ こで 一度 切れた よ 
う なかた ちに な り， したがって 角が でき る。 
点の 重ね 打ち をす るた めに は， 点 列の 終点 
であれば 左クリ ックを 2 回す る ことになる 
だろう し， そうでなければ i キー を 使う こ 
とになる だろう。 i キー は， その 場に 点の 
コピー を ひとつ 作る 働き をす るので， 1 回 
押す だけで いいはず。 また ここでう つかり 
マウス を 動か してし まっても， 左 クリック 
する まで は 確定 しないので， あわてずに p 
(previous— point) や n( next— point) なとの 
キーで 逃げる と よ い。 

• さ ら に 応用 技 として， 直線と rtli 線 を ひ と 
つの 点 列に 同居させる こと もで き る。 重ね 

打ちした 点 を 2 組 作り， 隣接させる。 する 

と， その あいだの 線 は 必ず K 線になる。 こ 
れを 使えば サ ーキッ 卜の コース 図 だって 簡 
単に 描け る （？ ）。 

• 描両 コマンドに は， カレント の 点 列 だけ 





| の 場合 


矢印の 点 を 重ね 打ちした 場合 


(力一 ソル 移動） 



p previous - point 

同じ 点 列 内の 前の 点に 移る 


n next point 

同 じ 点 列 内の 次の 点に 移る 


P previous -pts 

前の 点 列に 移る 


N next -pts 

次の 点 列に 移る 


(点 列の バラ メータ 操作） 



t thinner -point 

力一 ソルの 指す 点 を 細く する 


f fatter point 

力一 ソルの 指す 点 を 太く する 


T thinner - pts 

現在の 点 列 全体 を 細く する 


F fatter - pts 

現在の 点 列 全体 を 太く する 


c toggle-curve 

現在の 点 列の 自由 曲線 モー ドを 切り替え 

る 

C toggle -cyclic 

現在の 点 列の 循谍 モ一 ドを 切り替える 


(点お よび 点 列の 追加 • 削除） 



a append-point 

現在の 点 列 に ひと つ 点 を 付け 加 え る 


A append -pts 

新しい 点 列 を 作る （点 列 名 を 入力す る 二 

と） 

i insert-point 

力一 ソ ル 位置の 点 を 複製す る 


k kill -point 

力一 ソ ル 位置の 点 を 削除す る 


K kill -pts 

現在の 点 列 を 削除す る 


(描画） 



d draw- current - pts 

現在の 点 列 を 描く 


D draw- all - pts 

全 点 列 を 描く 


(ファイル 入出力） 

それぞれ ファイル 名 を 入力す る 二と 


w write- pts— file 

点 列 ファイル を セーブす る 


r read - pts - file 

点 列 ファイル を 口一 ド する 


o output - basic— program 

BAS に プロ グラム を 出力す る 


s save- pic - file 

画面 を PIC フ アイ ルに セーブす る 


1 load-pic-file 

PIC ファイル を 画面に 口一 ド する 


(終了） 



q quit 

画面 をク リアして 終了す る 


e end 

画面 をク リアせ ずに 終了す る 
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をお i く d(draw~current— pts) キー と 全 点 
列 を 描 く D(draw- all-pts) キーが あ るが， 
あま り 描画 速度 は 速く ない。 特に 後者 は， 
線の 数が 多 くな つてく る とだん だん ユウ ゥ 
ッ になって くる ことだろう。 だか ら ， 適当 
な と こ ろで s( save— pic - file) キー や 1( load 
—pic— file) キー を 使って， PIC ファイル を 
アンドゥ バッファの 代わりに 使う。 こうす 
れ ばいちい ち 全部 描 き 直す 必要 もない。 
• 現在 やって い る 作業の 続き を 次回 も 続け 
たいの なら， 必 ず w( write-pts— file ) キ 一 
で 保存 し , 次回 は！ •（ read- pts- file) キーで 
f 复フ じする こ と。 o(output — bas に 一 rile) キー 
で 出力す る BASIC の プログラム は， 実行 
可能に はなって いる が (行 番号が つかない 
ので 103(1@で 読み込む こ とが 必要）， 点 列 
エディ タに 再び読み 込む こ と はでき ない。 
* 

实は， 冒頭で 自由 曲線の ルーチンに 拡張 
を 行った の は， 点の 重ね 打ち を 許す ためだ 
つたので ある。 これにより 角の ある 曲線 や， 
llil 線 と 直線の 同居が 能に な る 。 点が 重ね 
打ちして あると いう こと は， そこで 零べ ク 
トルが 発生す る こと を 意味す る。 先月の 
バージョン では， 零 ベクトル を 許して いな 
かつ たの だ， というより， おかし な 動作 を 
してし まう。 別 に バグで は なく， そ れが仕 
様だった の だ （しっこい ぞ）。 

絵 を 描く スタイル は& 人の |'| 山で ある。 
気に入つ た 線が 描け るた びに PIC ファイル 
に セーブす る 人， PIC ファイル を アンドゥ 
用 バッファ として 使う 入， PTS ファイル 
を まめに 保存す る 人， BAS ファイルに^ 
としてから 本格的 に 加 _ にす る 人， どん な ス 
タイル を とっても いいと 思う。 

自由 課題と して， パージ ヨン アップ を考 
えても いいだろう。 たとえば 点 列 を 拡大 • 
縮小 • 移動 • 回転す ると いうの は， あると 
とても 便利で あ ろ う 。 ^本 的に は， 点 お よ 
び 点 列 を 削除/追加 し ない な ら， 特別な 操 
作 はいらない。 座標 を 変える だけだった ら 
それほど 困難 を 伴わない と 思われる。 ほ 力' 
にも ペイ ン ト く らい は 組み込むべき だと 力'， 
改良の 余地 はいくら でも ある。 ツリー 構造 
を 導入す るの は 相当な- 太 仕亊に な るか もし 
れ ない。 ある と 便利 だろ う け ど。 
* 

ど う も X-BASIC に は， 「も う ひといきの 
ところだった のにね え」 というと ころが 多 
々ある。 そ れが点 列ェデ イタの リストに も 
ちら ほら 反映して いる。 いちばん 困った の 
は， 再三 指摘され ている こと だ 力 5 , せつ 力' 
く ローカル 変数 を 文法的に 許して いるのに， 
配列 を 引数と してと る |»| 数が 巧 け ない こと 


であ る 。 おかげで 配列 を グ 口 一 バル 変数に 
と つ て 転送す るよう な 泥繩的 解決法 を 使う 
はめに なった。 ほ 力' にも print using 力 f 表 
示す る データ を ひとつし かと れ ないだ と 力'， 
配列 に し た 文字列 は linput や freads と 相性 
が惡 いと 力'， いろいろ ある。 

それから， この プログラム は コンパイル 
できない。 ついでに いう と， 点 列 エディタ 
で o コ マン ドを 使って' お 成す る BASIC プ 
ログ ラム も コンパイル できない。 理由の ひ 

と つ は， 前回 と 今回で 作つ た 外部 関数 と 同 
じ 機能 を 持つ た ラ ィ ブラ リ を 用意 していな 
いこと， もう ひとつ は 2 次元 配列 への 代入 
を 多用して いる こ と， などで ある。 

こ の 点 列 エディ タ の 操作 性 は 決 して ほめ 

られ たもので はない。 反応 もよ くない。 そ 
れ にもかかわらず コンパイル しょ うと 考え 
な いのは， 速度の 点で 足 をい ちばん 引っ張 
つてい るの が 実 は 描 pj|ij 数 そのもの （ aa 
— lines ( )|斜 数） だから なんだ よねえ。 う 
—んぉ 粗末。 

今月 は 2 本立て だ 

さて ここで 趣向 を 変えて， r 遊べる 2D グ 
ラフィック」 に 手 をつ けて みょう。 

ひ とつ は 65536 色の ハンデ を はね 返す， 
マ ッハ バン ド フ リ 一の 高 品位 グ ラデー シ ョ 
ン。 もう ひとつ は 偶然 性 と 意外 性 を 楽 し む, 
ランダム フラ ク タルに よ る 自然 物ジ エネ レ 
ータ。 気楽に 使って いただきたい。 

これ ま た X- BASIC の 外部 Iftl 数で あ る 。 
た だ， ここまでの 内容 と はまった く 関わり 
がない ので 独. な して 使える。 変: する に ant 
i.fnc を 持って いなくても 使える。 外部 関 
数の 名前 は map.fnc と した。 

それで は 作り方 を。 例によって テキスト 
エディ タで 以下の ファ イノ レを 打ち込む。 

• map.s (外部 I'MJ 数 ヘッダ) 

• map.h (マクロ 定義 ファイル) 

• main.c (引数 リスト 宣言） 

• grad box.c (ぉ；品伩 グラデーション) 

• crush. c (ランタ * ムフラ クタ ノレ) 
これらのう ち， 

- main.c (引数 リスト 宣言） 
は 前囬の ものと 同 じで ある。 

あ と は 同様。 そ れぞれ を コ ンパィ ルぉ よ 
び アセンブル する。 
as /u ~ .s 
cc /L 〜.c 
gcc -c ~.c 
リンク フェイズ も 同じ。 

lk /o map.fnc map.o main.o grad 
box.o crush. o % lib % Yclib.a(% lib 


%¥gnulib.a) %lib%baslib.a 
X - BASIC に 組み込んで 起動す る 。 

copy map.fnc a: ¥basic2¥ 
コ ンフィ ギュ レー シ ヨン ファイル は， た 
と え ば， 


FREE = 

128 

WIDTH = 

64 

BEEP 

ON 

CAPS = 

OFF 

FUNC = 

GRAPH 

FUNC = 

PIC 

FUNC = 

MAP 


のように する。 


アルゴリズムの 心 


' 'ーシ ョ ン。 
例によって 従来の もの を こ きおろ す と こ 

ろから 入る （ああ 悪い 性格)。 2D グラフ ィ 
ッ ク ツールの 最高峰で あ る Z'sSTAFF は， 
^高峰で あ るが ゆえに いろいろと 苦情 も 多 
くなる。 先月 は アンチ エリア シン グ対応 で 
ない こと を 攻撃した 力 ? ， 今月 は マッハ バン 
ド 無策 を あげつら つてい じめ てし まう ので 
ある （つくづく 悪い 性格)。 

Z'sSTAFF に 触って みた 方 は ご —<f じ だ 
ろ う 力、 結構 遊べて しまう 機能の ひとつに 
グ ラデー シ ヨンが ある。 Z'sSTAFF を 使 
つてみ てな かな かや る な と 思った の は， 道 
具 を 選ばず グ ラデー シ ョ ン がかけ られ ると 
ころで ある。 ボックス フィル は 当然の こと， 
ペン， ペイント， スキャン コンノ f 一 ジョン, 
な ど ほ と ん どす ベての 道具の 色 指定に グラ 
デーシ ョ ンが 使える の だ。 グラデ を 使い ま 
く つ た 絵 を 描いた 経験 は， 誰で も 待って い 
るので はな かろ う か。 

グ ラ デー シ ヨン は， 手軽 な 操作で そこ そ 

こ の 莨 感 力 f / h せる ので な 力 'な 力' に 重 ' | で あ 
る。 しかし 使いす ぎる と 単に 見苦しくなる 
だけ なので， そのうち だんだん と 使わ な く 
なって いく よ うで ある。 
さて， グラ デー シ ヨン は 確かに 使 利 だが， 

使って みる とどう も 神経に!^ る と こ ろが 
あった。 それが マッハ パンド。 あの 見苦し 
い 縞々 であ る 。 以前に も 何度かい つ て き た 
ことで は ある 力 f (これば つかり）， 少ない 
階 調 数で もって' 滑 ら かに 変化す る fc を 表現 
しょうと してぶ ち 当たる 壁が この マ ッハバ 
ンド なので ある。 まつ た く 入 間 様の 1 1 とい 
う もの はよ 〈できて いるもので， ちょっと 
し た 輝度の 変化で も 見事に 拾い出す。 件 段 
は 不足 を感 じ な い 65536 色 もこのと き ばか 
り は 不満の 種で ある。 

の エリア シン グは， 解像度の 不足 か 
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ら 生じる 不自然 さで， 今月の マッハ バンド 
は 階 調の 不足から 生じる 不自然 さ。 それで 
は 階 調が 十分に あれば マ ッハ バン ドは 消え 

ると いう の だろ う 力'。 こ れカ i '消 え る ので あ 

る。 た と えば 業務 用の CG システム だと， R 
GB それぞれ 8 ビ ッ ト （256 階 調） , 合計 24 
ビ ッ ト （約 1670 万 色） が 標準で あ る が, こ 
れく らい あれば 十分と いわれて いる。 事実 
こ の レベル に なれば 支陣は まったく ない。 
し かし X68000 は RGB 各 5 ビッ ト (32 階 調）， 
合計 15 ビット （32768 色)， 輝度 ビット を ど 
うう まく 使っても 16 ビット （65536 色） で 
ある。 これ を 真っ正直に 使った ので は， と 
て も マッハ バンド は 解消で きない。 

それで はどうす る。 先月 は， 解像度の 不 
足から 生じた エリア シン グを， 多 階 調 表現 
による アンチ エリア シン グで 補った。 そこ 
でものの 道理と して， 今月 は 階 調の 不足 か 
ら 生じた マ ッハ バン ドは 解像度で も つ て 
補って やる ことにしよう。 

といっても その 正体 は， 最近と みに 出番 
の 多い 粜野式 アル ゴリ ズムの 応用 （ォ リ ジ 
ナルは 65536 色 を 2 色に 落とす も の だつ た 
力、 これ は フル カラー を 32768 色に 落とす 
ように 改造して ある） である。 色 を 滑らか 
に 変化 させよ う と して 失敗す るの だから， 
細かな 揺らぎ を 持たせて やれば 目 を だます 
こ と もで き るであろう。 * 野 式 アル ゴリ ズ 
図 2 斜め グラデーションの 描 さ 方 

(|) 基礎 ： 点と 直線の 距離 

I ： ax+by+c=0 と 

P(x,, め） との 距離 d は 次式で 表される。 

lax. + by. + cl 
° 77+^ 


ムの 説明に ついては， もうす つかり 有名 だ 

ろう 力' らノ、 。ス。 

グラデーション を 高 画 K にす る だけで は 
あまりに 芸 がない ので， 斜め グ ラデー ショ 
ン もっけ てみ た。 斜め グ ラデー シ ヨン は Z' 
sSTAFF にはなかった 機能 だ 力 f ， 最近 見 
た PDS の グラフ ィ ック ツール に 搭載 さ れ 
ていたので， さっそく いただく ことにし 
た。 ただいた だく だけで は 面白く ない の 
で， * 野 式 アルゴリズム を 使って 品質の 高 
いもの を 作った という わけ。 まあ 速度が 少 
し 遅 いのは ご 愛敬。 斜め グラデーションに 
ついては， わりと 真面目に 色 を 計算して い 
る （だから 遅い）。 点と 直線の 距離 を 求め 
る 公式 を 使い， 開始 色と 終了 色の あいだで 
補間す る。 この 補間した 色の 精度 を 高めに 
とっておき， 画面に 出力す る 段階で * 野 式 
アル ゴリ ズムを 使って 階 調の 不足 を 補う。 
* 

次 は ランダム フラクタル。 

フラクタル 図形 は ご存じであろう。 自己 
相似 構造 を 持つ た 図形 を 総称 してこう 呼ぶ。 
フ ラ ク タル 図形 は 再帰 呼び出 し を 使つ て 生 
成す るの が 定石で あ る。 たとえ ば 樹木の 生 
成に は， まず 幹 を 作り， その 先の 枝に は少 
し 細い 木 を， さらに その 先の 枝に はもう 少 
し 糸 田い 木 を …… ， という 具合に 次々 と 下請 
けの ルーチン を 呼び出し， より 小さな 木 を 


作らせる。 そして 最後に できあがる 図形 は 
木に よく 似て いる。 この あたりの こと は少 
し 前の C 言語の 特集で 僕が 取り あげてい る 
話題 だから， 少し は 参考になる かも しれな 
い。 

そこで ランダム フラクタル である 力 》， そ 
の 名の と おり 乱数 を 使って 生成す るので， 
厳密にいえば 自己 相似 性の ある 図形と はい 
いがたい。 しかし 長い 目で 見れば （もう 少 
し 難しく いえ ば 統計学 的に は） 自 己 相似 性 
が 見受けられる， という ことで， これ もフ 
ラク タルの 仲間に 入れる。 やはり 再帰 呼び 
出 し を 使つ て 生成す る のが 常道で あ る 。 

もっと も 簡単な ランダム フラクタル は 1 
次元の ランダム フラクタル である。 まず 始 
点と 終点 を 決める。 その 2 点 間 を 結ぶ 線分 
をぐ しゃぐ しゃに 曲げる というの が もっと 
も 直感的な 説明だろう。 具体的に は， まず 
線分 を その 中点で 2 つに 分ける。 そして そ 
の 中点 を 適当に ずらす。 この 中点の 変位 を 
乱数で 決 める。 こうして できた 2 本の 線分 
を， それぞれ さらに 2 分割して 中点に ラン 
ダムな 変位 を 加えて …… ， と， あと はこの 
繰り返し。 できあがる 図形 は， まるで 稲妻 
のよ う にな るであろう。 

これ をち よつ と拔 張した のが 2 次元の ラ 
ン ダム フラクタル。 今回 使う の もこれ であ 
る。 まず 1 枚の 平面 を 用意す る。 それ を 縦 


(2) grad_box (xi, y,, x z , y 2 , g Xt g y ， c s , c e ) を^: 行 したと さ 
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• 横に 2 分割す る （4 枚の 小さな 平面が で 
きる）。 すると 格子点が 5 個 新たに できる。 
この 5 個の 格子点の 高さ を， やはり 乱数 を 
使って 変えて やる。 あと は 同じ ことで， 4 
枚の 小 平面に 対 し て 再帰 分割 を 繰 り 返して 
いけば よい。 こうして できる 図形 は， よく 
山の 表現の モデルと して 使われる 力 5 ， &然 
な 山 に 見せ る た め に は， 上の 説明 だけで は 
やや 不十分で ある。 格子点の 高さ を 変える 
際に， 

1) その 格子点と 隣り合った 格子点の 高さ 
の 平均 をまず とる。 その あとに 乱数で 変位 
を 加え る。 

2) 冉帰が 深 くなる と 分割 も 細か くなる。 
だか ら 変位の 振幅 も それにしたがって 小さ 
く してやる。 

と いった 工夫が 必要であろう。 
さて， 2 次元の ランダム フラクタル は 山 
の 表現に 向いて いると いった 力 5 , 今回 は そ 
れとは 違った 利用の しかた をしょう。 自然 
界には フラクタルの 構造が 多 〈見られる と 
いわれる。 そこで， 計算機に フラクタル を 
導入す る こと で 自然 物 を 擬似 的に 表現 し よ 
う という 試みが あちらこちらで なされて い 
る。 ランタ' ム フラクタル も その ひとつな の 
である。 

ここに 1 枚の 絵が あ ると しょう。 こ れを， 
ランダム フラクタル を 使って 変形す る。 
た つ た こ れ だけの こ と なの だが， かなり 面 
図 3 ランダム フラクタル 


白い 効果が 出 る ので 驚 き だ。 絵 を ど う 変形 
する のか。 各 格子点の 変位 （つま り 山の 高 
さ） を， 歪みの 度合いと 考える ので ある。 
山が 高い ほど 歪み も 大きい。 山の 起伏が 激 
しい ほど 絵の 乱れ 方 も 派手 になる。 

山の 高さ や 起伏の 様子 は， パラメータと 
し て BASIC 側 か ら 好きに 与えられ るよう 
にした。 どんな 変形が 起こる のか， 実行し 
てみ るまで わからない 力 *， 偶然と 意外 性 を 
楽しむ の も 風流な も ので あ る 。 

さて 使い方 

くどい 説明 はさつ さと 終わって， おいし 
い と ころ を 味わ うほう に 進む こ とに する。 
* 

グラ デー シ ヨンから いこう。 斜め かつ 高 
画質 の グラデーション だが， 残念 ながら 矩 
形 領域 （つまり ボックス フィル） のみの 対 
応 であ る。 先月 制作 し た 描画 閱 数の タイル 
パターンの 代わ り に 組み込む こ と は 十分 可 
能な の だが， それに は 大幅 な 改造が 必要 そ 
う だつ たので あ きらめた。 それよりも 単独 
で 使 うことの ほうが メリットが 多そう だ。 

使い方 は 至って 簡単。 

grad box(xl, yl, x2, y2, gx,gy,cs,cej 

(xl,yl) — (x2,y2): 矩形 領域 

(gx,gy): 色が 変化す る 方向の べク トル 

cs,ce: 開始 色と 終了 色 



'ン ダム フラ クタ 


2~3[p] 試せば， 使い方 はすぐ にわかる 
ことと 思う。 少し デキる 人なら， マウスで 
方向 と 領域 を 指定 し て グ ラデー シ ヨン を 描 
かせる プログラム も 簡単に 書け る こ とだろ 

* 

そ して ランダム フラクタル。 

使い方 は 2 段階に 分かれる。 
1) ランダム フラクタル 格子 を 生成す る。 
random _ iractal(LO;float, P ； float, 
seed) 

LO: 初めの 振幅 

ク: 振幅の 減衰 係数 

seed:SL 数 系列の 初期値 

L0 と /3 は 実数で 指定す る。 L0 は 歪みの 
度合いの L- 1 安で 100~200 が 標準 的な 値で あ 
ろう。 タ は 0.1~0.5 がいい 線だろう 力'。 こ 
の 辺 は， 経験が もの をい うし， 第一い ちば 


(1) 1 次元 ランダム フラクタル 


(2) 2 次元 ランダム フラクタル 



D(x, y) 





画像 S 。を， ランダム フラクタル 格子 
D(x, y) を 用いて 画像 S, に 変形す る。 

S,(x, y) = S,(x, y+D(x,y)) 


今回 は ランダム フラクタル 格子の 大き さ を 128 x 128 とし 
たので. それよ り 大きな 画像 を 変形す る 際に モザイク 模 
様が 出る の を 避ける ために 補間 を 行って いる。 


特集 2 デジタル ペインティングへの 道 ]_17 


ん 効果的な 値な ど， （契に も わか ら ない。 そ 
こも ランダム のよ さなの だ （？ ）。 とりあえ 
ず は 前記の 値で 始めて， いろいろと 値 を 変 
えて 試す の が 無難 な 線で あ ろ う 。 

2) ラ ン ダム フラ クタ ル 格子 を 使って グラ 
フィ ック 画面 を 変形す る。 

crush(xl， yl, x2， y2， k;float) 

(xl，yl) — （x2,y2):fti 形 領域 

k: 歪みの 倍率 
k は 実数で 指定す る。 実は この 値が でき 
あがり をい ちばん 大き く 左右す る。 だから， 
ラ ン ダム フ ラ ク タル 格子 を 生成す るの は 起 
動 時の 1 回た" けに してお いて， （山 1 像 を 生成 
す る たびに 違う k の 値 を 指定 すれば そ れで 
十分な よ う な 気がする。 なにぶん 乱数 相手 
なので， なにが 起こって も 不思議 はない。 
* 

ここでお すすめの 使い 力' が あるので， 紹 
介しょう。 さきほどの グラデーションと コ 
ンビ にして 使う ので ある。 

1) ラ ン ダム フ ラ ク タル 格子 を 生成す る。 
random— fractal (200.0, 0.1, 1234 

5) 

2) 青白の グラ デ一 シ ヨン を 描く。 

grad box (0， 0， 255， 255， 2， 一 5, rgb 
(0, 0,31), rgb (31,31, 3D) 


3) 画像 を 変形す る。 

crush (0, 0,255, 255,0.5) 
もつ と も 重要な パラメ一 タは 3) の k の 値 
(この 例で は 0.5) である。 これ を いろいろ 
変えて 効果 を 試したい 場合 は， 毎回 フ レツ 
シュな グラデ 一ショ ンを 用意すべき だろ う。 
す な わち 2) 〜3) を 繰 り 返す 必要が あ る の だ。 
ここで 3> だけ 繰り返しても， 画像が どん ど 
ん 崩れて いく だけ だ （それ は それで 面白い 
が)。 

で， 実行 結果 だが， 雲の ような 絵が 出て 
き た ので はない かと 思 う 。 元 絵 は グ ラ デ一 
シ ョ ン だから， かな り 規刖 的な 絵の はずな 
のに， 一度 ランダム フラクタル 処理 を かけ 
て やる だけ で， 結構 |ffi |'| 1 ， 効果が 出 せ る 。 
2) の グラデーション を も つ と複雜 きな ハ。 タ一 
ン にして みたり， 色 を 変えて みたり して， 
いろいろな テクスチャ の 表現に 挑戦 してみ 
て も らいたい。 

元 絵 や パラメータ しだいで は， 炎， 大理 
石， など も 作れそう である。 レイ トレ一 シ 
ン グの テクスチャ マップに そのまま 使って 
もい いく らいの 画質 は 保証す る。 応用 範囲 
は 広い。 処埋が 遅 いのが 玉に キズ といえ よ 
う 力' （もっとも こ れは 僕が 高速 化 を さ ぼつ 
たせいだ が）。 

リス 卜 1 


終わりに 

今回 は ネタが 散漫に なって しまった。 点 
列 エディ タは 先月の フォロー みた いなもの 
だが， あとの 2 つ は， 処理 速度 を ちゃんと 
し た う えで， 今後 出て くる グラフィック ッ 
—ル にも 組み込んで ほしいく らいの 機能で 
ある。 この 分野で は PC- 9801 シリーズに 
出て いる 2 次元 グラフ ィ ック ツールに一 日 
の 長が ある。 とりわけ， 自然 物の 表^と い 
う 力、 表情 豊かな 2 次元 グラフィック を 作 
るた めの 努力 を 惜しんで いない ツールが い 
くつ か あり， 充実した 環境と いえる。 

X68000 な ら それらと 同等 以上の ものが 
作れて も 少しも 不思議 は な 、の だが， こ う 
いう アプローチ を とった グラフ ィ ッ タツ一 

ルは 不思議と 兒 かけない。 Z'sSTAFF 力 f 
他の 追随 を 許さない のなら， それ は それで 
よい。 別の 方面から 超えれば よいだ けの こ 
と。 そんな ツールの 出現 を 願って やまない 
ので ある。 

参考文献 

ラ ン ダム フ ラ クタ ルを 用いた 木 a と 大 ^ィ,' 衷^ 技 

術， 横 井茂 樹*阀 田稔， PIXEL, 1988.8, pp.87— 
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loimo /» 点 列ェ -v f タ 
10010 key ] , oeinso I o 
10020 /« 

10030 str crl f.oo 1' 
100-10 crH'=chrS(iHi)l 
10050 eof=chrS(».HlAl 
] 00 GO dim str flag! 1 


10080 di 
10090 di 


各 点^ レ') 名^ 

[Hi 線と して ぼ 幽する か 

点 列 


1016G 


10180 
10190 
10200 
10210 
10220 
10230 
102-10 
10250 
10260 
10270 
10280 
10290 

10310 
10320 
10330 
10340 
10350 
1036Q 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10443 
13450 
10460 
10470 
10480 


点 列 リストの 續化 


f reel ist ( l J =1+ 1 
pts list(ii0) = -I 
ptal i st ( i , 1 ) =- 1 
next 

f*reelist(31)=-l 

i = 0: j=l /* i» 目の 点 列の J 番 9 の 点を処 ほす る 
/* fflffi などの 初 R)i 化 
screen 1,3,1,1 
mouse ( 1 ) ： mouse ( 4 ) 
msarea (0,0,311,511) 
se tms pos ( 2 3D , Zob ) 
open_mini buffer! ) 
/* メ> ンル一 ブ 
while 1 

c=set_point( i , j ) 
/* レ ペル 3 ：点タ 1]^ なくても よい コマンド 
if ( c= * q ' ) or ( c= ' e ' ) then break 
if ( c= 1 2 ) then wi pe { ) ： cont inue き、 
if ( c= ' s ' ) then save_pic ( ) : continue 
if ( c= ' 1 ' ) then load__pic( ) :continue 
if (c= 'r' ) then { 


c lose m i n i bu f f er ( ) 

read— pt.s ( ) 

i = rirst:j = pts cur ( 

setmspos ( pta ( i , j ,fl 

continue 


L s : open ir 


0490 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
0570 
0580 
0590 
0600 
0610 
0620 
0630 
0640 
0650 
0660 
0670 
0680 
0690 
0700 
0710 
0720 
0730 
0740 
0750 
0760 
0770 
0780 
0790 
0800 
0810 
0820 
0830 
0840 
0850 
0860 
0870 
0880 
0890 
0900 
0910 
0920 
0930 
0940 
0950 
0960 
0970 


if (c='A， ) then ( 

if f irst >- 1 then tdraw{ i , 1 , 0 ) 
k = append M pl-fi 1 ) 

if k> - 1 then i=k : j = append poi nt. ( 
continue 

I 

I * レベル 2 ： 点 判が 1 本 以上 コ マン ド 
if ( f irst=-l) then I 

cis : print "There is no pts - Try 

pause ( ) 

continue 

and {pts I i si ( i , 0 い-】 > t 


tdraw ( i 
setmspos ( pts ( i , j , 0 ) > pts ( i 
continue 


tdraw ( i 

setmspos (pts|i,j,0>,pts(i , j , 1 ) ) 
continue 

f (c=0 ) and I pts ( i , B , I) ) = 1 ) then 
j =Bppend poi n t ( i ) ： pts— curl i ) = j 
continue 


k = append— po i n t ( i 
if k> - 1 then ,j = ii 
cont inue 

f (c='K， ) then { 
tdraw{ i , I , Q ) 
k=delete_pts( i ) 
if ( f irst >- 1 ) ar 


setmspos ( 
tdraw ( i , 1 


con t inue 


l-pts_ 


118 Oh! X 1990.9. 


0980 1 

11990 

if n< Z t hen ret- urn ( ) 

0990 i I" ( r = '(； ' ) t hpn I 

12000 

t=pts( i , 0 , 1 ) 

/* 点 列の クイ フ 

100U t drawl i , 1 , 0 ) 

12010 

if j= 1 then i 

/* Wt' 点 

1010 pts( i ,0, U = ! -pi s " , 0 , 】 > 

1 2020 

tl i ne ( x , y , p t s ( 

i . j+ 1 » 0 ) , pts ( i , + I , 1 ) , p,m ) 

I 020 tdrnul i , 1 , 1 ) 

12030 

if t=l then I 

/* cvri.ic な ttiA 

I 030 r» o n t i n 1 1 f * 

1 2010 

t L i ne I pts 1 i , 

n , 0 ) , p t s ( i , n , I ) p ^ i >' i P i m ) 

10 10 ) 

1 205U 

) 


1050 if ( c= ' D ' ) then 1 

1 2 06 0 

return ( ) 


1060 wipe! 1 

12070 

1 


10 70 k = fi rst 

12080 

if j=n then | 


1080 whi If 1 

1 2090 

t line ( pt s ( i i j- 


1030 it' k =- 1 then break 

12100 

i f t = 1 then \ 

/» cyclic な ' 

11 00 .iraw | h ) 

12110 

t J i ne ( x i y , pt 

s{ i , 1 , U } , pts ( i , t . 1 1 . p.m ) 

1110 k=ptsJ ist { k , n ) 

12120 

1 


1 1Z0 endwhi le 

12130 

return ( ) 


1130 r-on I i hup 

12140 

1 


U-40 } 

12150 

1 1 i ne { pt. s 【 i , j - 1 , 


1 1 50 if ( c-= ' u- ' 1 l. hen tcri te_pt s t 1 : ront i mit- 

12160 

L 1 i ne ( x , y , pts ( i , 

j+i^0) ,pts(ilj+l , i ) ！ p.n 1 

1160 i f ( c= ' ■» ' ) then output program* i ; con t i ntie 

12170 

return ( ) 


11 70 /» い； ル l お' し ぉュ し 点る 1 iEt;.L.£.S なコ v 二 1 

12180 

end F unc 


1 180 if (pts( i ,0,U )<2) then | 

12190 

/， マウスお ボタン 力 ヰ 一入 力 を 得る 

1 190 els 

12200 

func char set— point 


1 200 print ''There is no po l n( . Try ' a ' '？ ommantl or pr—ss l<?r 

12210 

int x , y , r\ , ry , bl , 

br 

-but ton . " ； 

12220 

str s 


lc 1 0 pause ( ) 

12230 



1220 cont i nup 

12240 

pr int_status ( i , j , 


1230 | 

12250 



1 240 i f I r ： = 0 ) then ( 

12260 

rubber_band { i , j 


1250 if j=pts( i ,0,0) then 【 

12270 

s = inkeyS ( 0 ) 


1 260 k= append— point ( i ) 

12280 

if s <> " " then break 

1270 if k>- I then j=k : pts curl i ) =.j 

12290 

mspos ( x , y ) 


1280 ) 

12300 

rubber band ( i , J 

,x,y,0, 1 ) 

1290 cont i nue 

12310 

mss tat ( rx , ry , bl 

r br) 

1300 ) 

1232Q 

if ( rx<>0 ) or { 

ry< >0 ) then print_status( i ,j,X|>") 

1310 if (c= 'n ' ) and ( j<pts( i ,0 ,0 ) ) then 1 

12330 

if blOC then t 


1320 j= j+1 ： pts— cur ( i ) = j 

1234D 

if f irat=-l then break 

1330 setmspos ( pts ( i , j , 0 ) , pts 1 i , _j , 1 1 1 

12350 

rubber— band ( i 


1340 continue 

12360 

rubber band ( i 

,j, P ts(i!j,0) ,pts( i , j , 1 1 , 1 ,0) 

1350 ) 

12370 

pts(i,j,0)=x: 

pts( i , j , 1 ) =y 

1360 if 1 c= ' p * ) nnd I j > 1 ) t hen ( 

1238Q 

rubber band ( i 

, J , pts ( i , j , 0 ) , ptsl i i j t 1 ) , 1 t 1 ) 

1370 j=j-l :pts_cur(i)=j 

12390 

if ( pts{ i ? 0 t 1 

1=1) and { pts {1(0,01=3) then tdra 

1380 setmsposlpts(i,j|0),pts(i,j,l ) ] 

1) 



1390 continue 

1240(3 

while (bl<>0) 

: msst at { rx ,ry , bl , br ) ： endwhi le 

1400 1 

12410 

if ( rx<>0 ) or 

( ry <>0 ) then print_status( i,j,x, 

1410 if ( c= ' t. ' ) and ( pts ( i , j , 2 ) >0 ) then I 

12420 

break 


1420 pts{ i , j , 2 ) =pts ( i , j , 2 ) -1 

12430 

1 


14 30 continue 

12440 

endwhi le 


1440 } 

12450 

return ( asc ( s ) ) 

/* マウスの ボタン 力 调 された 啦 は 0 を 返す 

1450 if ( c= ' f ' ) then ptsl i ,j ,2 )=pt.s( i ,j + \ ;continue 

12460 

endf unc 


1460 if (c= 'T' ) then i 

12470 

/ * druw-current-pts 

： i 番目の 点 タ") (^画 

147C for k=l to pts( i ,0,0) 

12480 

func draw { i ) 


1480 if pts( i ,k , 2 ) >0 then pts( i ,k , 2) =pts( i ,k , 2 ) -1 

12490 

int j 


1490 next 

12560 

for j=Q to pts ( i , 

(5 , 0)-1 

1500 cont i nun 

12510 

tmpl ( j ,0 ) =pts ( i 

, J.0) 

1510 ) 

12520 

tmpl ( j , 1 ) =pts ( i 


1 520 if {c= 'F* ) then [ 

12530 

tmpl ( j , 2 J =pts ( i 

, j , 2 ) 

1530 for k= 1 to pts ( i , 0 , 0 ) 

12540 

next 


1540 pts ( i , k, 2 ) =pts( i , k , Z ) +1 

12550 

tmpl (0 ,0 ) =tmpl ( 0 , 

0)-1 

1550 next 

12560 

pts oversample ( tmp 1 ) 

1560 cont i nue 

12570 


) then ( 

1570 1 

12580 

pts curvef tmpl , 

0,0 , tmp2 ) 

1580 if (c= ' i ' ) then { 

12590 

aa_l ines { tmp2 ,65534 ) 

1590 k= insert Doint ( i , j ) 

12600 

) else aa 1 ines ( tmp 1 , 65534 ) 

1600 if k > - 1 then j = k ： pts curt 

12610 

end func 


1610 continue 

12620 

/* draw-all-pts : ^ 

列の 描画 

1620 ) 

12630 

func tdrawt l , p , m ) 


1630 if (c='k， ) then ( 

12640 

int n i j 


1640 tdraw(i, 1,0) 

12650 

n=pts( i , 0,0 ) -1 : if 

n=0 then return ( ) 

1650 k=delete_point( i , j ) 

1266Q 

for j=0 to n 


lb60 if k> -1 then j = k ： pts cur ( i ) = j ： t.draw( i , 1 , I ) 

12670 

tmpl ( j , 0 ) =pts ( i 


1 6 70 cont i nue 

12680 

tmpl ( j , 1 ) =pts ( i 

， j， U 

1680 } 

12690 

tropl( j,2)=pts(i 

, j f 2 ) 

1 b90 if ( c= ' d ' ) then draw( i ) : cont inue 

12700 

next 


1700 endwhile 

12710 

tmpl (0,0) rtmpl { 0 ， 


1710 /* 終了 

12720 

pts oversample ( tmpl ) 

1720 close minibuf fer( ) :cls 

12730 

tl ines ( tmpl , p, m } 


1730 if c=»q' then wiped /* ' e ' のとき は gffi を i 肖 さすに 終了 

12740 

endf unc 


1740 mouse ( 0 ) ： mouse { 2 ) 

12750 

/傘 append-point ： 点 を 追 Jirt る 

1750 end 

12760 

func int append point { i ) 

1760 /* 点 列 £?>Wfli をお 示す る 

12770 

int n , x , y 


1770 f unc print status ( i , j , x , y ) 

12780 

n=pts(i,0,0)+l 


1 780 if f irst = - 1 then return { ) 

12790 

if n=100 then [ 


1790 cis /* pts( i ,0,0) 番目の 点 は ラパー バント' 上 （未 SKii) 

12800 

els 


1800 print pts name ( i ) ； Flag(pts f lag( i ) ) ； type { pts ( i , 0, 1 ) ) ； 

12810 

print "append - p 

oint ： no new point is available. 

1810 print j-1 ； "/" ;pts| i , 0 , G 1 - 1 ; " { " ； x ； " . " ； y; " ) "； pts( i , j ,21; 

12820 

pause ( ) 


1820 end f unc 

12830 

return ( -1 ) 


1830 /* エラー 把 t:. 時な どの 入力 待ち 

12840 

1 


1840 f unc pause { ) 

12850 

pts ( i , 0 ,0)=n 


1850 int rx , ry , bl , br 

12860 

if n=l then ( 


1860 str s 

12870 

mspos { x i y ) 


1870 beep 

12880 

pts ( i ,n , 0 ) =x 



12890 



1890 msstat(r>:,ry,bl,br) 

12900 

pts(iin]2)=16 


1906 s=inkey$ ( 0 ) 

12910 

) else { 


1910 if rx or ry or bl or br or 1 s <> " " ) then break 

12920 

pts{i,n,0)=pts( 

i ,n-l ,0) 

1920 endwhile 

12930 

pts ( i , n , 1 ) =pts ( 


1930 end f unc 

12940 

pts ( i , n , 2 ) =pts { 

i，n- 1 :2) 

1948 /* ラバ一 バンド 條示 

12950 

i 


1950 f unc rubber band ( i » j ! x i y , p t m ) 

12960 

return { n ) 


1960 int n, t 

12970 

endf unc 


1970 if f irsl = - 1 then return! J 

12980 

/* insert — point ： 点を揷 入す る 

1980 n = pts(i,0,O) /» 点 列の 数 

12990 

func int insert do int ( i , j ) 
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13000 

int n , x t y 


14020 

return ( fw ) 

13010 

n=pt.s( i ,0,0) 


14030 

) 

13020 

if n=99 then I 


14040 

pts 1 i st ( bk , t) I = t'w 

13030 

els 


14050 

ptslis" fw, 1 ) =hk 

1 3040 


oint ： no npi-' po int is avn i I at) I r . ； 

1 4060 

re turn ( f w ) 

I 3050 

pause ( ) 


14070 

end f unc 

13060 

return t - 1 ) 


14080 

/» メヅ セージ 表' 于：閣城 を 作る 

13070 



14090 

func open m in i l>u I' f'er ( ) 

13080 

n=n+l 


14100 

conso 1 e 3 0,1,1 

] 3 090 

pts ( i , 0 , 0 ) =n 


Ml 1 (l 


13100 

if n=2 then { 


14120 

end f unc 

131 10 



14130 

/* メヅ セージ 表^ 械を 閉じる 

13120 

pts( i ,n,0)=x 


14140 

func close—mi n i tmH'er ( ) 

I3】30 

pts{ i ,n , 1 ) =y 


14 150 

els 

13140 



14160 

console 0,31,1 

13150 

J else ! ' 


14170 

endf unc 

13160 

while 1 


14180 

/* ファイル 名に 拡ミ) f 子 をつ ける 

13170 

pts ( i , n i 0 ) = p t. 

s(i ,n-l ,()) 

14190 

func str put extend I f i Lename ； st r , nst ； st.r 1 

13180 
13190 

pts ( i , n , 1 ) =pt 
pts ( i , n , 2 ) = p t. 

s( i ,n-l , 1 ) 

14200 
14210 

int i 

i = ins tr { 1, filename, " . " ) 

13200 



14220 

if i >0 then f i Lename = lef t S ( filename, i- 1 ) 

13210 

if n= j t.hen break 

14230 

return ( f i lename+e\t ) 

13220 



14240 


13230 

) 


14250 

/* write-pts-fiie ： 点 列 データ を セーフ' する 

13240 

setmspos ( pts ( i , j 

,01， pts ( i , j , 】 1 > 

14260 

f unc write_pta ( ) 

13250 

return ( j ) 


14270 

to 

1 3260 

endf unc 


14280 

int f p , l , j 

13270 

/* delete- point ： 点 を 削除す る 

14290 

dim int tmp( 299 1 

13280 

f unc int delete— poi 


14300 

els ： 1 input "write-pts-f i ] e ： "； f i lename 

13290 

int n , x , y , k 


14310 

iilename = put_extend ( filename, " . PTS" ) 

13300 

n=pts( i,0,Oi 


14320 

f p = f open ( f i J ename , "c" ) 

13310 

if n=l then ( 


14330 

cla : print using "writing pts - file ' @ f i lename 

13320 

els ： print "delete - point: no point exists-"; 

14340 

i=f irst 

13330 

pausef ) 


14350 

while i>-l 

13340 

return ( - 1 ) 


14360 

f writes ( pts name ( i ) +crl f" , f'p ) 

13350 



14370 

fputc( pt3_flag( i ) , fp ) 

13360 

for k= j to n- 1 


14380 

tmp{ 0 ) = pts ( i , 0 , 0 ) -1 

13370 

pts( i ,k,0 )=pts( 

i f k+l ,0 ) 

14390 

tmp ( 1 ) = pts ( i , 0 , 1 ) 

13380 

pts ( i , k , 1 ) =pts ( 

i ,k+l , 1 ) 

14400 

tmp( 2 ) = pts ( i , 0 , 2 ) 

13390 

pts ( i , k , 2 ) =pts ( 

i ,k+l , 2 ) 

14410 

for j=l to pts( i ,0,O)-1 

13400 

next 


14420 

tmpU*3 ) = pts{ i , j , 0 ) 

13410 



14430 

tmp( j 本 3+1) = pts ( i , j , 1 ) 

13420 

pts(i,O,0)=n 


14440 

trap<j*3 + 2 > = pts( i , j , 2 ) 

13430 

if j >n then j=n 


14450 

next 

1 3440 

setmspos ( pts ( i , j ， 

0) ,pt8(i, j, 1 ) ) 

14460 

fwrite{ tmp, 3+(pts( i,0,0 J-l ) *3 , fp ) 

13450 

return ( j ) 


14470 

i=ptsliat( i ,0) 

13460 

endf unc 


14480 

endwh i le 

13470 

/* append - pts ： 点 列 を ij 

附る 

14490 

f close { fp ) 

13480 

f unc int append pts 


14500 

print "done" ； 

13490 

int fw 


14510 

endf unc 

13500 

str stmp 


14520 

/* read — pta-file ： 点 列 データ を ロードす る 

13510 

if f re=-l then ( 

/零 こ tua 上 点 列 を 作 い 齢 

14530 

func re&d— pts(> 

13520 

els ： print "new- 

pts ： no new pts is available. ； 

14540 

str filename , stmp 

13530 

pause ( ) 


H550 

int f p, i , j 

13540 

return ( - 1 ) 


14560 

dim int tmp( 299) 

13550 



14570 

els ： 1 input " read - pts — f i le ： "； f i lename 

13560 

if f irst=-l then 

( /* 点 列 リストが 空の t» 合、 新規に 作る 

14580 

filename = put— ex tend < f i lename , " , PTS " 1 

13570 

d 

f re 

14590 

f p = f open ( filename, " r " ) 

13580 

f re = f reel ist ( r r 

e) 

14600 


13590 

ptslis t ( last , 0 ) 

=-1 

14610 

if fp=-l then { 

13600 

ptslist ( first , 1 


14620 

print using "no such file as '&'."； f i lename ； 

13610 

) elBe 1 

/* 点 列 リストに 新しい 点 列 を 追 力 trT る 

14630 

return ( ) 

13620 



14640 

j 

13630 

fre=freelistirr 

e ) 

14650 

print using " reading pts-f i le ； filename; 

13640 

ptslist(last,0) 

=fw 

14660 

i=0 ： f irst=i 

13650 

ptsliat ( fw,0)=- 

1 

14670 

while ( feof ( fp)=0 ) 

13660 

ptslist( fw, 1 )=last 

14680 

f reads ( a tmp, fp ) 

13670 

last=f w 


14690 

pts name ( i ) =stmp 

13680 



14700 

pts 二 flag ( i )=fgetc ( fp ) 

13690 

els ： 1 input "new — p 

ts ： " ； stmp 

14710 

fread( tmp, 3 , f p ) 

13700 

pts name ( last ) =s tmp 

14720 

pts(i ,0,0) = tmp(0 ) 

13710 

pts flag ( last ) = 1 

/* デフォルト は 曲 » とする 

14730 

pts j i , 0 , 1 ) = tmp( 1 ) 

13720 

pts 了 last ,0,0 い 0 

/* まだ 点 列 は 空 

14740 

pts( i ,0,2) = tmp ( 2 ) 

13730 

pts(last,0, 1 )=0 

/* CYCLIC でない 

14750 

freadt tmp, pta( i ,0,0) *3 , fp ) 

13740 

ptadaat ,0,2)=0 

/* オーバー サンプリング なし 

14760 

for j=】 to pts (i, 0,0) 

13750 

return ( last ) 


14770 

pts( i , j ,0 ) = tmp fj*3-3) 

13760 

endf unc 


14780 

pts( i , j t 1 ) = tmp( j*3-2) 

13770 

/* delete-pts ： 点 列 を 肖 flSTT る 

14790 

pts(i, j ,2) = trap( j*3-l ) 

13780 

f unc int delete 一 pts 


14800 

next 

13790 

int fw, bk 


14810 

j =append_po i n t ( i ] : if j > - 1 then pts— cur ( i 1 = j 

13800 

if first=— 1 then 

1 

14820 

ptslist( i ,0)=i+l 

13810 

els ： print "delete - pts: no pts exists . " ； 

14830 

ptslist ( i f 1 ) = i - 1 

13820 

pause ( ) 


14840 

tdraw(i , 1,1) 

13830 

return ( — 1 ) 


11850 

i = i+l 

13840 



14860 

endwh i le 

13850 

fw=ptslist( i ,0) 


14870 

last=i- 1 

13860 

bk=ptaliat( i , 1 ) 


14880 

ptslist ( first , 1 ) =- 1 

13870 

f reel ist ( i ) =f re 


14890 

ptslist{last,0)=-l 

13880 

f re=i 


14900 

f close ( fp ) 

13890 

if (fw=-l ) and (h 

k=-l ) then ( 

14910 

print "done" ； 

13900 

firat=~l 


14920 

endf unc 

13910 

laat=-l 


14930 

/* 綱の 1 単位 且を文 柳: する 

13920 

return { f re ) 


14940 

func str ptaat ( i , j ) 

13930 

) 


14950 

Btr stmp 

13940 

if (fw=-I) then ( 


14960 

stmp = itoa( pts ( i , j , 0 ) ) + " , "+itoa(pts ( i , j , 1 ))+","+ i 

13950 

last=bk 


a は， j 

2)) 

13966 

ptsli3t(bk,0)=- 

1 

14970 

return ( stmp ) 

13970 

return ( bk ) 


14980 

endf unc 

13980 



14990 

/零 output-basic-program : BASIC プログラム を 出力す る 

13990 

if (bk=-l t then 1 


15000 

func output program ( ) 

14000 

f irst=fw 


15010 

str f i lename 

14010 

ptslist( fw, 1 ]=- 


15020 

int f p , i , j 


120 Oh! X 1990.9. 


► 今月で 100 ゆか あ。 うちの Oh!X(MZ) も 90||ii- になり ました。 ，i ヒ； 2： に-せ 用の 本棚 を 買って 
やろう と 忍って ます。 谷 ロ充弘 （17)0OK 都 


リス 卜 s 


5980 
5090 


els ： 1 input "outptit -basic-program: ； filename 
filename = put_extend( filename , " . BAS" ) 
fp = f open ( filename , "c" ) 

els ： print using "writing basic-program ' @ ' . . , 
fwritest •'/* " + filename+crlf , fp ) 
fwrites( "screen 1,3,1,1 "+crlf , fp ) 
fwritest "dim int tmpl 99 , 2 ) " +crl f , fp ) 


while i > - 1 
f writes ( 
fwri tea ( 
pts( i ,0, 
fwri tes ( pts s 
f writes ( crlf , 


5260 
fp ) 


fp ) 
5290 
5300 
If, fp 


" tmp= 


fp 


fwri tes ( " , " , f p ) 
fwrites( pta_st{ i , j ) , fp ) 
if j=pts ( i , 0 , 0 ) then f writes 
fwrites( crlf, fp ) 
next 

pts( i t 0,0)=pts(i,0,0)+l 

fwri tes ( "pts_oversample { tmp 

if pts— flag(i)=l then ( 

fwri tes ( "ptscurve ( tmp ,0,0 


f writes ( "pts move ( tmp , 

fwri tes ( "aa 1 ines { " +pts_ 
i=ptslist(i,0) 


1999,2)"+crlf, fp ) 


fp 


J.'+crif, fp 


f",rgb(31,: 


/****** テキス H 

((include "anti.h" 

#define TKVRAM 0xE00 賺 
tdefine PLSIZE 0x020000 
#define RASTER 0x80 

unsigned char OVERSAMPLE_NOTYET( ]=' 'オーバ 一サンプリング 座標に 変換して ください"; 
unsigned char BAD_PLANE〖 ]= 'プレーン 番号に は 0-3 を 指定して ください'' ； 

void c_tline( xl, yl, x2, yZ, plane, mode ) /* 1 区間お ナ （» 分 1 本） 描く 

yl, x2, y2; /* 座標 


int plane; 
int mode 


\M の プレーン 番号 */ 
描画 モ一 卜' （ 0： reset, l:set， 2： 


dy2, 


unsigned short ^address, pat; 

dx2 = ABS( x2-xl ) ； 
dy2 = ABS( y2-yl ) ； 
sx = SGNI x2-xl ) ； 

sy = SGN( y2-yl )*(RASTER/sizeof (short) ) ； 
ssp = B_SUPER( 0 ) ； 

address = ( short * ) ( -TXVRAM+planetPLSIZE+y l*RASTER+(xl/16 ) *2 
pat = ( 0x8000>>(xl%16) ) ；■ 

if { dx2>=dy2 ) ( 


dy2 *= 
for ( 


mode < 2 ) *address |= pat; ノ * set ... OR */ 

！ (modeftl) ) * address pat; /* reset ... OR+XOR */ 

dy2; 


if (sx>0) 


pat ： 
-addn 


0x8000; 
ess++ ； 


pet : 
addre 


= -dy2; 
= dy2; 


dy2 


if ( mode く 2 ) * address I = 
if ( ！ (mode&l) ) * address 


reset • , . OR+XOR 


5320 endwhile 

5330 fwrites{ "end" +crlf , fp ) 
5 340 f writes ( eof , fp ) 
5350 fclose( fp ) 
5360 print "done" ； 
5370 endfunc 

5380 /* save— pic — file : グラフ ィ ヅク, を セーブす る 
5390 f unc save_pic( ) 
5400 atr filename 

5410 cla : linput " aave-pic-f i le : " ； f i lename 
5420 filename = put— extern! < f i lename , . PIC 
5430 els : print using "saving pic - file 
5 4 4 0 pic save ( i i lename ,0,0,511,511 ) 
5450 print "done" ； 
5460 endfunc 

5470 /* load— pic— file ： グラフ ィヅ ク國を ロードす る 
5480 fane load_pic( ) 
5490 atr filename 
5500 int fp 

5 510 cla ： linput '■ load— pic - f i le : " ； fi lename 
5 520 f i lename = put extend { filename , ".PIC 
5530 fp = f open{ filename , "r" ) 
5540 if fp=- 1 then ( 

5 550 els : print using "no such r lie as ' @ 1 

5560 pause ( ) 

5570 return ( ) 

5589 ) 

5590 fclose{ fp ) 

5600 els ： print using " loading pic - file ' @ 1 . 
5610 pic_load( filename ,0,0 ) 
5620 print "done" ； 
5630 endfunc 


pat = 0x8000 ； 
address++ ； 


pat = 0x0001; 
addreBs — — ； 


dy2; 


B 一 SUPER ( ssp 
return; 


FUNC tline( dummy 

DUTMY dummy; 

/* int xl, yl, x2, 

unsigned int xl , 


ARGSETI dummy 
xl =IVALUE(1 
yl =IVALUE(2 
x2 =IVALUE(3 
y2 =IVALUE(4 
plane=IVAJ J UE(5 
mode =IVALUE{6 

if ( plane>3 ) 
#ifdef GNUC 


■2, plane, mode */ 
x2, yl , y2 , plane, mode; 


lea.l BAD— PLAKE's 


#else 


lea.l —BAD— PLANE ，al 
#endasm 
#endif 

return ( 1 ) ； 

c_tline( xl , yl, x2, y2, pla 

return ( 0 ) ； 


FUNC tlines{ dummy ) /* 間数 本体、 
Dl^MY dummy; 

/* PTS *pta ； int plane , mode */ 


unsigned 


*pts; 


2， yl , y2, plane, mode; 


ARGSET ( dummy ) ； 

ARYSETt 1) ； 

pts =PARYT0P(1); 

plane=IVALUE(2}; 

mode =IVALUE(3): 


89012345678901234567890123456789012345B7B901234 

11222222222233333333334444444444555555555566666 


56789812345678901234567890123456789012345678901234 5 678901234567890 

666667777777777888888888899999999990000000000111111111122222222223 


► 編粜 部の 移転先が,', V;^ と はこ りゃォ ドロ キ！ という こと は枭 岳# の 駅で 編 Ifc 部の 人と 
すれちがつ ている のかな 一。 木 村^ (17)—求 京都 


特集 2 デジタルべ ィ ン ティ ング への 道 】21 


リス 卜 4 


#endif 

return 


xl = PIX( pts[i][0] ) ； 

M = PIX( pt3[i][lj )； 

x2 = PIX( pt3liH][01 ); 

y2 = PIXt pta[i+l][l] ); 

c_tline{ xl , yl , xZ, y2, plane, mode J ； 

f { pta[0I[l]==CYCLIC ) I/* 点 列 カ嚷 している 船、 終点と 始点 をつな ぐ */ 
xl = PIXI pts[n】[0] 
yl = PIX( pts[n][lj 
x2 = PIX( pts L 1 ] [ 0 ] 
y2 = PIX( pta{ 1]|1] 
c_tline( xl , yl , x2, yZ, pla 



リス 卜 5 


random _i"rfic+.H I ( f ] oat 


I, y2, float k ) 


インフォメーション ■ チーフ 


122 Oh! X 1990.9. 


► g 本 據の某 店で は MZ-2521 が 9， 800R で, MZ- 80B 力 5 980ド1 で^られて いま した。 時の 流 

れ は- v- い。 木 下 iiikU8) 


if ( plane) 3 ) ( 
#ifdef — GNUC— 

asm ( " lea.l —BAD— PLANE, al" ) ； 
#else 
#aam 

lea.l —BAD—PLANE, al 
Jtendasm 
#endif 

return ( 1 ) ; 

J 

if ( pts [ 0 1 [ 2 ] ! =OVERSA'-IPLE ) ( 
#ifdef — G ぼ— 

asm ( " lea.l _OVERSAMPLE_Nan'ET , n 1 " に 
#else 
#asm 

lea.l _OVERSAMPI,E_NcrrYET , a 1 
#endasm 


リス 卜 3 


* ハ' ラメ ータ • テ一ブ の ポインタ 

PTR— PARAM ： 

dc • 1 TLINE— PAR 
dc . 1 TLINES— PAR 

* ハ"ラ メータ' テーブル 

int_val ： equ $0002 拿 int 

FTS— ary: equ $0052 * ID-array of PTS ( 2D-array of int 

void— ret: equ $ffff * void 


aid_ret 


胃への ボイ ンタ 


dc.l tline 
del t lines 


#define 誦 （ 
#define MAX( 


( ( ( X ) X V ) ) 
(( (X)>(Y) ) 


のつ ち 大きくない ほう V 
' のうち 小さくな いほう 》/ 


二 と (0» 度 を 得 るた めの マスクと ビヅ トシ フ I 


#define VMASK 一 B 
#define VMASK_R 
#define VMASK^G 

((define SHIFT— B 
-define SHIFT— R 
((define SHIFT_G 

/* R.G.B から カラ- 

#define RGB(R,G, 

/* カラー コードから 

If define BLUE(C) 
(fdefine RED(C) 
(tdefine GREEN(C) 

Ifdefine IMAX 31 


62 /% 0 漏 00000,1 1IU0 
1984 /* 0bOO0001 1111000000 
63488 /* 0bll 1110000080001)0 


コード を 計 鋒す る */ 

) ((B)«SHIFT_B| (R)«SHIPT_ 
^.G,B 成分 を 取り出す */ 


I (G)<<SHIFT_G) 


( (C)&VMASK__B) 
( (C)&VMASK_R) 
( (C)&VMASK_G) 


■ SHIF1'_B 
SHIFT_R 
' SHIPT^G 


！, (；, B の 輝度の 最大 ffi 


========== tl ine.s ================== 

****** 外 SOTJ へヅダ 

* tlines.c 

拿 tline( int xl r yl , x2, y'l , plane , mode 

* tlinea( PTS *pts, int plane, mode ) 

* インフォメーション 'テープ ル 

X INIT 
X_RIJN 
X_END 
X_SYS 
X— 腿 
X_CTOL_D 
X_RES1 
X_RES2 
PTR_T0KEN 
FTR— PA 删 
PTR— EXEC 
0,0,0,0,0 

X_INIT: 
X— 匪： 
X— END: 
X— SYS: 
X_BRK: 
X— CTRL— D: 
X_RES1: 
X_RES2 : 

rts 

* f« 欲 名 テーブル 

PTR 一 TOKEN: 

dc.b 'tline' ,0 
dc . b ' tlines ' ， 0 


/*»*»** ^Lffl マクロな どの 定 ft ******/ 


#define N_PIXEL 


J ーンの サイズ は 512x512 ビクセル */ 


-BASIC 力、 らの 引数 を アクセス する 


typedef 
typedef 


x_a\sic の 外 gHifl 数：^ り侦は エラー コード */ 
C との 弓 | 数の 受け渡しの 逸い を HSUii す る ダミー 引数 


extern unsigned short (par; 
extern unsigned short «ary[ 10+1 ] ； 


--雕 ぬ 引数 リ 
— B 柳な 請 J 


： X-BASIC おは Jft 大 


#define ARGSETI 
#define ARGC 
#define AT0P( I 
#define TYPEt I 
#define IVALUE( 
#define CVALUEt 
#define FVALUE( I ) 

/* その他、 便 禾リな マクロ 


I par=( unsigned short * ) (&A) 

( parte] ) 

( (I)*5-4 ) 

( par [ ATOP ( 1)1 ) 

( * ( int *) (par[ATOP(I)+3]) 

( par[ATOP(I)+4] ) 

( ((double "(& (parlATOP( I ド 


Hfdefine ABS( 
#define SGN( 


((X)>0)?(X):[-{X))» 
((X)>O)?l:(((X)<0)?( 


引数 


/* 第 I 引数の'^ 
/零 引お の 型 */ 

) /* int の */ 

/* char の 通 */ 

)) ) /* float の 油 */ 


号 （正負 または 麥） 


11 ほ 345678901-23456789 


012345678901231-5 678 7n^9012345678901234567890123456789012 

555555555566. bG6 "3 666 33344444-4444455555555556666666666777 


に ccccccccscccn 

wddddddd ん dddd 

I PI 


dddddddddddd 


r J.h70n 9 012345678901234-56789 

2222233333333334444444444 


12345678901*. 2345678901234 

1181111111122222 


* パラメータ • テーブル 

f loat_val ： equ $0001 * float (引数） 


リス 卜 6 


dx = x2-xl ； 
dy = y2-yl ； 

if ( gx>=0 
xs=0; 
xe=dx; 
else { 
xs=dx; 


-' ( gy>=0 
y3=0; 
ye=dy ； 
else { 
ys=dy; 


gs = GEEEN( cs ) 聿 SC; 
bs = BLUE( cs )*SC; 


ge = GEEEN( ce )*SC; 


( x=0; x<=dx; x++ ) bg[0]|x] = br[0][x] : bb[0J[x] = 


gx*xs+gy*ys; 

= gx*xe+gy*ye-w;/* 敝 値 をと る 必要 はない afl^ 内の 点に Jrf する d と 常に 同^ ■) ： 


{ x=0; x<=dx; x++ ) 

= e; 

( y=0; y<=dy; y++ ) 


x<=d>:; x++ ) 


x=0; >; く：: dx: x++ J [ 

+= ( ( (d0-cl)*rs+d*re)/d0 
+= { ( (d0-d)*gs+d*ge)/d0 
( ( (d0-d)»bs+d*be)/dO 


r = cr/SC 
S = cg/SC 
b = cb/SC 


slbuf[K] 
br[lb][> 


特集 2 デジタル ペイ ン ティ ング への 道 123 


int_val: equ $0002 * int (引お） 

float— val—omt: equ $0081 本 float (省略 可） 

int_val_omt : equ $0082 * int (^°T) 

void ret: equ $ffff * void (蔑り 値） 


=-=----"- grad_box.c ========== 二 ======= 

/****** 触 グラデーション （マ' ソハ バンドな し） ******/ 

# inci i jar; < g raph . h > 
#include "map.h" 

き define SC 256 /» 色の 精度 を 確保す るた めの 倍率 */ 

unsigned char 0LT0F_SCREEN【 1=^拉 した 座 待が スクリーンの 鹏^ です"； 

FUNC grad box( dutimy ) 
DUI*IY dummy; 

/* int xl , yl , x2, y2, gx, gy, cs, ce */ 
{ 

int xl , yl , x2 , y2, gx, gy, cs, ce; 
int d«, d, w; 

int tmp, x, y, xs, ys, xe, ye, dx, dy, yy; 
static int xx[ PIXEL ] ； 

unsigned int r, g, b, rs, gs, bs, re, ge, be; 
unsigned int lc, lb, c; 
unsigned int eg, cr, cb, dg, dr, db; 
static unsigned int bg【2jl N— PIXEL ] ； 
static unsigned int br[2] [ N— PIXEL ] ； 
static unsigned int bb[2] [ N— PIXEL ] ； 
static unsigned short slbuf [ N— PIXEL 1 ； 

ARGSET ( dummy ) ； 
xl=IVALUE(l) ； 
yl=IVALUE(2) ； 
x2=IVALUE{3) ; 
y2=IVALUE(4) ； 
gx=IVALUE(5) ； 
gy=IVALUE(6); 
cs=IVALUE(7); 
ce=IVALLTE(8J; 

if { x2<xl ) { 
tmp=xl ； 
xl=x2; 
x2=tmp; 

if { y2<yl ) { 
tinp=yl ; 
yi=y2; 

y2=tmp; 

) 

if ( xl<0 || x^>=N_PIXEL || yl く 0 || y2>=N_PIXEL ) ( 
#ifdef _(MJC_ 

asm( " lea.l _a/rOF_SCREEN,al" ) ； 
#else 

lea.l —CUTOF— SCREEN, al 
#endaam 
#endif 

return ( 1 ) ； 

) 


► の る 吸り では ビデオ ボード （CZ-6BV1) の ピン は 6 本し かないよ う に 見える 力 f , 気 
のせいだろう 力'。 今 田 智^ ：(16) お I'KIU 


X— INIT 
X_RUN 
X_END 
X 一 SYS 
X_BRK 
X— CTR 
X— RES 
X_RES2 ： 

rta 

* TO 名 テ一フ 


* ノ、' ラメ一 タ ■ テ一 フリ^ ポインタ 


RANDOM— FRACTAL 一 PAR ： 


dc.w rloat val 

dc<w float val 

dew int_val_omt 

dc.w i ntva l_omt 

dc.w int val omt 

dc .w int_val_omt 

dc.w int— val omt 

dc.w void ret 


* wss への ポインタ 

PTR_EXEC: 

dc . 1 _grad_box 

dc.l random fractal 

dc . 1 crush 

.even 


grad box ,0 
' random f ractal ， ， 0 
'crush' ，0 


GRAD_BOX_PAR 
RANDOM— FRACTAL— PAR 
CRUSH— Par 


int 一 val 
int— val 
int— val 
int— グ& 丄 
intval 
int val 
int 一 val 
int— val 
void ret 


int val 
intval 
int— val 
int— val 
float_val 
void ret 


■R90123456789012345678901 

-11222222222233333333334. 


-456789012 

•444444555 


"90123456789012345678901234567890123456 

'1222222222233333333334444444-4445555555 


-^■^■678901234567890123456789012345678901234. 

-5555556666666666777777777788888888889 9 9 9 9 


78901234567890123456789012345678 901234 567890123456789012 

55566666666667777777777888888888 8999999999900000000^0111 


N N 0 

T L 1 2 o A ^ . 

I R E-s B 一 Li Pi-R 一 R R K 0 

-tllJLl-.l 丄 lllll 

おおお. c おねお わお おおお 

dddddddddddd 


n 

b b b b G 

■ ■ ■ ■ V 

^ d d d d . 



pcccnccccc 

-ddddddddd 

員 


■■ c b G c c c 

R d d d d d d 
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\<dx)?(x+ 
x<dx)?(x+ 
x<dx)?(x+ 


slbuf, s i zeof ( short ) * ( dx+ 1 ) 


リス 卜 7 


=========== crush, c ============== 

/****** ランダム' フラクタル による 自«( 


nclude <stdlib. 

nclude <basic0.i 

nclude く gra ゆ. h 

nclude <math.h> 

nclude "map.h" 


#define GAUSS(X1 
nd())/(4*65536)) 


( rand( )-rand( )+rand( J -rand ( )+rand( ) -rand ( )+rand 


#define M 
#def ine R ' 


/* ランダム • フラクタ^! お ij の サイズ */ 
/* g レベル ： log M */ 


nt D[M+1HM+1J; /* ランダム. フラクタル fidWJ 

ur+1]; /* mm */ 

nt S[R+1J; /» 分麵の 大きさ V 


unsigned int 


unsigned int s, 
e = S[nl; 


while ( D【y 】[x+s2 

D[y Ux+32] = (D 
while ( D[y+s J【x+s2 

D【y+s 】tx+s2】 = (D 
while ( D[y+sZ]Ix 

D[y+s2][x I = (D 
while < D[y+s2] [x+s 

D[y+a21[x+s J = (D 

while ( Dly+s2][x+a2 
D[y+s2][x+s2J = (D 
USS(Llnl); 


y+s] 


x 】+D【y+s】 [x+s 
x ]+D[y+s]Ix 
x+s]+D[y+s] [x+s 


GAUSS (L 
GAUSS (し 
GAUSS (L 
GAUSS (L: 


y 1 [ x+s 2 】 +D[y+a 1 [ x+s^ 1 +DI y+a2 1 【 x J +D[y+s2 ][x+rJ)/4 


n]) 


f { a>2 ) { 
rf( n+1, x , 
rf ( n+1, x+s2, 


, y+s2 


FUNC randooi_f ractal ( dummy ) 
DUMMY duimy; 

/章 float 10, b; (int seed( , d00, 


double 10, b; 


d01=0, dl0=0 


ARGSETI dunmy ) ； 
10=FVALUE(1) ； 
b=FVALUE(2) ； 

ARGC>2 ) seed=【VALUE(3): 
AR0C==7 ) I 
00=I\'ALUEt4) ； 
0I = IVA1AJE(5>; 
10=TVALUE(6) ； 
1=TVALUE(7) ； 


以下 は « 略 可 ，/ 


srand( seed 


il = (int)(10*exp{-b*(doul 
i] = (M»i); /* 


( y=0; y<=M; y++ 
or ( x=0; x<=M; x+ 
D[y)[x]=0; 


D[0][M]=d01; 
D[M][0]=dl0; 


^ を 13^" する 

m; 

tltfii の 大きさ 
/* M 匕 */ 


D[M][MJ=dll 


return { 3 


/* 再 による ランダム 'フラクタル 》/ 


extern unsigned char CXJTOF_SCREEN[ 1 ； 
FUNC crush ( dunmy ) 


DUMW dunmy; 

/* int xl, yl, x2, y2; float k */ 
I 

int xl, yl, x2, y2; 
int idx, idy; 
douhie k; 

int x, y, yf , wy, tmp; 

double d, d00, dOl , dll, dlO; 

double dx, dy, ix, iy; 

int ixO, ixl , iyO, iyl; 

static unsigned short slbufOI N— PIXEL 


ARGSCT{ dunmy 

xUIVALUE(l) 

yl=IVALUE(2) 

x2=IVALUE(3) 

y2=IVALUE(4) 

k=FVA!AJE(5) ； 


slbufll N_PIXEL ] ； 


if ( x2<xl ) { 
tmp=xl ； 
xl=x2; 
x2=tjnp; 

1 

if ( y2<yl ) I 
tmp=yl ； 
yi=y2; 
y2=tmp; 

idx : x2-xl ； 
idy = y2 - yl; 
dx = (double) idx; 
dy = (double) idy; 


#ifdef 


x2>=N_PIXEL || yl<0 
a.l OUTOF SCREEN, al" 


y2>=N_PDCEL 


#elae 
tasro 

lea.l 一 OUTOF— SCREEN, a 1 
itendaam 
#endif 

return ( 1 ) ; 


( 


get{ xl+x, yl, xl+x, y2, slbuf 0 , aizeof ( short ) twy 
ix = ( double ) x* ( double ) M/dx ； /* fiffH] に 使う */ 
ix0 = (int)ix; /* fi» 部 （切り捨て） */ 

ixl = ix0+l; /* SSftSR (切り上げ） */ 

ix -= (double)ix0; /» */ 

for ( y=0; y<=idy; y++ ) 1 

iy = ( double ) y* ( double )M/dy ； / * 綱に 使う 座 様 */ 
iy« = (intjiy; /* 整お 節 （切り捨て） */ 

iyl = iy0+l; /* 整 R 都 （切り上げ） */ 

iy -= (double)iyO; /* / 爾部 */ 


{ double )D[iyfl 
(double)D[iyO 
(double)D(iyl 
< double 1D【 iyl 
1.0-iy)*{(l.O- 


[ix0] 


/* ランダム フラクタル 格子 を */ 
/* 細細する */ 


[ixlj; 

，d00+ix*d01)+iy 韋 U 


-ix)*dI0+ix*dll) 


yf = y+(int)(k*d); 
if ( yf>idy ) yf=idy; 
if ( yf<0 ) yf=0; 
slbuflty] = 3lbuf0[yf]; 

) 

put{ xl+x, yl , xl+x, 


slbuf 1 , sizeof( short l*wy 


/****** パラメータ 受 t"t« し 用 i5 変 » の 実体 **«**/ 

unsigned short *par; /* —RW な 引お リス 卜 */ 

unsigned short *ary(10+l]; /* リスト：） t-BASIC 朗 |JS【i* 大 


/****** コンパイラ を 通す ための ダミ- 

void main( ) 

I 

J 


im さ い ) """/ 


bbbbbbbb -1 

bbbbbbbb c 


3456789G1 

111111122 


2 3 4 5 6 7 8 

2 2 2 2 2 2 2 


£ s 7 8 s U1111111112222222222^3T^33333C^34444444444555555555566666666667777777777888888BSP 
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X68000CARD.FNC 用 カード ゲーム 


赤黒 （SPEED)sri 
BLACK JACKsss 



CARD.FNC を 使った ゲー^ シリーズ 第 3 ， 4 弾。 今回 はかなり ポピュラーな ゲーム， 
赤黒 （SPEED) と BLACK JACK の 登場た。 せっかくの CARD.FNC, 目 一杯 使 
つてみ ようじ やない か。 まだまだ ネタ はっきない ぞ。 みんな， どんどん 投稿して ぐれ。 


リアル 夕ィ厶 カード ゲーム 


CARD.FNC を 使つ て ト ラ ンプ ゲーム 
を 作って みま し た。 6 月 号の 付録 ディ ス ク 
のお かけ" で 全国の ユーザーが CARD. FN 
C を 持って いる こ と と 思います。 CARD. 
FNC は Oh!X 5 月 号で 発表され た X-BASI 
C 用の カード ゲーム 支援 関数 群です。 カー 
ドの グラフ ィ ック データ を 内蔵して いるの 
で， 誰に でも 手軽に カード ゲーム を 作る こ 
とがで きます。 

今回 発表す る ゲーム は 「赤黒」 です。 知つ 
ています か？ もしくは 「SPEED」 と 呼ば 
れる ことの ほうが 多い かもしれ ません。 ト 
ランプ を 酷使す る ゲーム と して 有名です ね。 
私 は 小学校の 頃よ く やって いた も ん です。 


ルール 


一応， ルール を 解説して おきます。 カー 
ドを 赤と 黒の 2 つに 分けてお き， プレイヤ 
一は 黒の カード を 持って います。 画面に は 
手札のう ちの 4 枚ず つが 表示され ています 
ね。 マウスの ボタン を 押す と ゲーム スター 
卜です。 

ゲー ム が始 まると 手札の うちの 1 枚ず つ 
が 画面 中央に 現れます。 これらの 上に 4 枚 
の 台 札の う ち 数 上が り ま た は 数 下が りの シ 
一 ケンス を 組む もの を 重ねてい きます。 台 
札の 空いた と ころに は 手札から 新しい 力一 
ドが 補充され， 先に 手持ちの カードす ベて 
をな くした ほうの 勝ちになります。 なお， 
台 札 は マウス ボタンの 左右で どち らの 山に 
積んで いくか を 指定し ます。 台 札 を 出す 際 
に は スー卜 （記号） や 左右の 位置 は 関係 あ 
り ません。 

双方と も 出せる カードが なくなったら 手 
札から 新しい カー ドを台 札と して 1 枚ず つ 
山に 積みます。 カードが 出せる 状態なら， 
いつでも カード を 出す こ とがで きます。 要 
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赤黒 

する に 手の 速い 人が 勝つ という， トランプ 
に は 珍しい リ アルタイ ム ゲームな のです。 
双方の 手札が な く なった 場合 は， 残った 
台; II の 数で 勝敗が 決ま ります。 同数の と き 
は 数字の 合計が 少ない ほ う が 勝ち となり ま 
す。 そして， コンピュータか プレイヤー か 

どちら かが 3 勝し た 時点で 1 ゲーム 終了で 
す。 

* * * 

できるだけ 短い プログラム にしよう と 思 
つたので すが， プログラム を 作る のが 下手 
な も ので， や は り 300 行を少 し 超えて しま 

いま した。 

プログラム 中の シャツ フル ルーチン は 5 
月 号の 「99」 の もの を そのまま 使わせても 
らい ま した。 （M.S.) 


已 LACK JACK 


こんにち は。 CARD. FNC は も う BASIC 
に 組み込みました か？ 先月の HEART 
に 引き続き， 今月 も SPEED が 投稿され， 
予想 以上の 反饗に 驚 (• 、ています。 なに を K3. 
そ う 実は 私 も SPEED を 作って 編集 室へ 持 
つてい つたので すが 「投稿が 来て るよ」 の 
一言で ボッ になって しまい まし た。 「ガー 

ン！ しまった あ 」 といっても あとの 

祭り アフター フェス ティ ノりレ 。で も， そこで 
引き下がって は 男の 名折れ。 この ショック 
を エネルギーに 変えて， わずか 3 日で 作つ 
てし まつ たのが この ブラ ッ ク ジャ ッ ク です。 


BLACK 

JACK 



1 


もう I W) 


fit., • 

|| 
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BLACK JACK 


ルールの 説明 


人数 は 2 人 以上， 使う カード は ジョ一 力 
一 を 除く 52 枚です。 札に は， 次に 示す よう 
に それぞれ 点数が ついています。 
A …… 1 点 または 11 点 （任意） 
絵札 …… 10 点 

数 札 …… 数字 どお り の 点数 

ゲーム は 最初に， ベット （賭け金） を 場 
に 出して 始まります。 ディーラーが ベット 
を 出した 人のと ころに カード を 配り ます。 
カード は 1 枚 目を伏せて， 2 枚 0 は 表に し 
て 配られます。 カードが 2 枚 配られたら， 
伏せて ある 1 枚 0 の カー ド を 1'1 分 だけで 兄 
て， 1 枚 目と 2 枚 目の 力一 ドの 点数 を 足 し 
合わせ ます。 こ の 点数が ハン ドの 基本 点 と 
なります。 この あと ディーラー がもう 1 枚 
カード を 引く か 聞いて くるので， 必要なら 
1 枚 もらいます。 もちろん， その 3 枚 目の 
札 も ハン ドの点 数に 加算 されます。 

こ こで'; 主意し なければ いけな いのは， ハ 
ン ドの点 数 は 21 点 を 越えて はいけ ない と い 
う こ とです。 ハンドの 点数が 21 点 を 1 点で 
も オーバーしたら， ハンドの 点数 は 0 点に 
なって しまいます。 たとえ ばハ ン ドの 点数 
が 19 点 も あるのに， もう 1 枚 カード を 引く 
という こと は， 危険 きわまり ない こと だと 
いう こと を 念頭に おいて， 3 枚 目 を 取る か 
ど う か 決めます。 

最後に ディーラーが 3 枚 目 を 取る かど う 
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か 決めてから， お 互いに 伏せて あった 1 枚 
a の カード を 見せ 合い， 強い ハンド を 待つ 
ていた ほうが 場の ベット を もらいます。 デ 
ィ 一ラー は ゲームの あいだ じゅ う 変わる こ 
と は あ り ません。 

なお， 本来 ブラックジャック では 21 点 を 
作った ときの ハンドの かたちに よって， 睹 
け 金の 倍 払い や 3 倍 払い という ル一 ノレが あ 
る はずな のです 力 ? ， 誰に 聞いても いう こと 
が 全然 違う ので， 今回 は 倍 払い ルール はつ 
けませんでした。 

プログラム では， コンピュータが ディー 


ラ 一になって あな た と 1 対 1 で 対戦 します。 
最初 に お 互 いに コインが 5 枚^ ら れ， 1 ゲ 
—ム にっき 1 枚ず つべ ッ ト と して 支払い ま 
す。 ゲーム は 相手の コイン をす ベて 卷き上 
げた ほうの 勝ちになります。 ゲーム は ほと 
んど 1'1 動的に 進行し ます。 途中， 3 枚 目の 
カード を 引く かどう か 聞いて くるので， マ 
ウス を 操作して， YES または N ひのと ころ 
でクリ ック してく ださい。 

最初 は コイン 20 枚く らいで 対戦 させよう 
と 思って いたので すが， あまりに も コイン 
が 多い と ゲームが 終了す るのに 1 〜 2 時間 

リス 卜 1 赤黒 


も かかつ てし まつ て 話に なり ま せんでした。 
コ ィ ンの 枚数 を 変えたい 人 は リ ス 卜の 行番 
号 90 の 変数 kazu の 値 を 変えて みて く ださい。 
ホ氺 * 
99 から 始まって， HEART, SPEED と， 
すでに CARD. FNC 対応の ゲーム は 4 本 
も 揃ってし まいました。 しかし， トランプ 
ゲ一 ム は 奥 力す 深 い。 まだ ま だた くさん のゲ 
—ムが X68000 で 動く 口 を 侍って います。 
読者の 皆さんの なかで 「我 こそ は」 と 思う 
人 は， どんどん ゲーム を 作って 投稿し まし 
よう。 侍って ます。 （T.M) 


. ォ: ^(荧 


I .kurol 25 
13), kuro 


ma n = 3 8 o , rom= , see = 0 , pnss = 0 
((_end = 0 , beg in= 1 , end f = 0 
lpvol="t20018rrrrrrrrrrr" 


( r_card=cd+ 1 
( ace k i nK < 1 


910 endfunc 


cd- 1 ) then return ( 1 I 
cd- 1 ) then r« turn ( 1 ) 
ace_K i ngl r_rard , cd } ) then 


ile (endr=0)/« メイン フ ログ 
nv_ini 1 1 ) : shuffle t I : card_f 
while I g_end=0) 

measaRef 1,0)： open_cnrd I ) 

wh i 1 e ( beg Ln= 1 ) 

mnn^play { ) :com_play( ) 

endwhi J e 


t' unc man _ p 1 a y ( )/* 人 (III 
i n t ps , ch 

mspos ( mx ， my ) : msstat { x t y , ib , rb ) 
if (lb or rb) then i 

pa:{mx-138) ¥ (iO: paes=0 
if { lb=-l ) then i 

kuro— nokori ( cd check ( ps , H , ku r 
) else { 

kuro nokori ( rd cher k < ps , 1 , kur 

endf unc 

f'unc com— play ( l/， コ ンヒ ユー タ 
int i,cd,ch 

i f ( m_stat ( 1 ) =0 and pass =tl } t hen 
for 1 =U to 3 

( aka_nokori ( cd. cher-k ( Rec , (i 

( nkn nokori ( cd i:h*?r^k ( flee , 1 


return 1 I 


, com ) , setj ) 


( see ) i <'om I , see ) 


return 1 ) 

see= ( see+ 1 ) mod 
next ： pass= 1 
if (vic_check( ) ) 
if ( man_check ( ) =0 


f unc int aka_nokor i 1 ch :int,ps;intl ノ 
i f tch=l ) then t 

sheet dspl 0 ) : m_p Lay ( 1 J 
if lr— od<26l then card__pnt, ( ps , (！ 
if ( r_sheet=4 ) then roverBet J 
return ( 1 ) 

I 

return 1 0 ) 
end f unc 
I、 

f.um: kuro tiokori (ch ； int ，py ； 1 n t 1 / * 力 
int dm 

if (ch=l ) then { 
sheet— -dsp( 1 ) 

if ( b od< 26 1 then rard^put ( p» , 1 
kuro_te ( ps ) =- I ： d m = \' i c* ノ. h»?cl( ( 1 


endf unc 

f unc sheet— dspl sw; int ) / * H ") f) W I 
switch sw 

case 0 : r_sheet=r_sheet- 1 

locate 1 0 , 3 ： pr int us i 
break 

case 1 : b— sheet = b— sheet - 1 

locate 55, 28: pr int us 

endswi tch 
endf unc 
/ 辠 

func int man check ( 1/* 出せる カー I 


d= ( c_num- 
wi tch lr 

case 0 ： i 


f ( l_card=cd+ 1 or 
card_clrtn,pc,< 
i f ( aoe^k i ng ( 1 _rt 
card_cl r ( n , pr , 1 
break 
f ( r card=cd+ 1 or 


1— <?&rd= 
',c ntim ) 


■d - ! J t.hpn 
J _card=cd : 
then ( 
1 _card=cd ： 

■d- 1 1 then 


return ( 
rot. urn ( 


endaw itch 
return ( 0 ) 
endf unc 


if け r— c=l 
if (lr— c 

1 

return 1 0 ) 
endf unc 
/* 

func card_c] 
int w 

w = n*60+14:t 
wi ndow ( w , f 
window ( 0 , 
c_put( lr* 1 

endf unc 

/* 

func card pt 


then return 


num ； i nt ) / * 


-5 ) , 2 0 H + 1 rnd( ) • 10- 
* 手の カー ドを 加 


ps=n 拿 60+143 
swi tch sw 

case 0 : c_put ( ps ,com, aka( r_od ) ) 

Bka te ( n ) =akn ( r^od ) : r_od=r_od+ 1 
break 

case 1 :c_put t ps ,man , ktirn ( b_od ) ) 

kuro_t e( n ) =kuro( b_od ) : b. od = b od+ 1 

endswi tch 
end func 

func int vic_oheck) 1 / * カート-力 （ なくなれ： f IS ち 

if' ( r_sheet = 0 ) then defeat ( I ： loop_out I ) ; ret urn ( 1 ) el 
i f ( b— sheet =0 J t h«n virt.oryl ) : loop— out { ) : return! 1 1 

1 

return ( 0 ) 
end func 


f (aka_te( i ) <>-l ) then I 
rs = rs+l :rc = rc+( ( aka_te ( i J - 
j = i*60+ 1 4 3 : c _pu 1 1 j ,oom , aka 

f ( kuro_te( i ) < > - 1) then ) 
bs=bs+T ： hc=bc+ ( (kuro te( i ) - 


i ) then de f eat ( I else ( / 
> bs } then v ictory ( ) else 
rs=bs 1 then ( 
( rc<bc ) then defeat! ) /* 
( rc> be ) then victoryt ) 
( rc=bo ) then message ( 4 , 


8 での 判定 

ての 判定 


loop— out ( 
end func 
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func victory(}/* ほち 
vic=vic+l 

leve 1= lef t$ ( level , Len ( level J - \' i c ) : mm n 1 1 ( ) 
if ( vic=3 ) then ( 

game— end (vie, def , 0 ) : message (5,0): ques t i on ( 
) else meBsnge (3,0) 
endf unc 

f unc defeat (, ) / * fi i - ) 

def =def+l 

if (def =3 ) then ( 

Same— end (vie, def , 1 ) ： message ( H : ques t i on ( 

) else messaRe ( 2 , U ) 
endf unr 


func quest i o 
message ( 7 , 
repeat 

mBpos ( mx 


:tnaareat 29^ , 236 ,^73, 'i 
y > : mss r a 1 1 x , y , 1 b , rh t 


then { 

loop— out( > : level="t20018rrrrrrrrrrr" 
:msarea( 137, 379,377 ,4H7 ) 
0 : mess— c 1 r ( ) 
) else loop_out( ) :endf=l 
end func 


func loop— out| J /» ヌレ - 
pass = 1 : begi n=0 : K_e 
endf unc 
/* 

func open— card ( > / * 赤 
if (r_od<26) then 


S ポ 


2010 
2020 
2030 
2040 
2050 

2070 
2080 
2090 


l_card= ( aka ( r_od ) - 1 ) mod 1 3+ 

r od=r_od+l : sheet_dsp( 0 ) 

if ( r_aheet=4 ) then reverse ( 

if (b od<26 ) then ( 

c_put ( 293 , 208 , kuro ( b_od ) ) 
r_card= { kuro ( b_od ) - 1 ) mod 1 3 
b_od = b_od+ 1 : sheet._dsp ( 1 ) 

} 

m— play ( 1 } : ben i n= 1 ： pass = 0 
endf unc 


f unc shuffle 
int i , j ,k , 
message ( 6 , 


=aka i j ) ： ako 


= aka ( k ) ： aka I k ) = 1 


2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
23-10 
2350 
2360 
2370 


l=kuro ( j ) : kuro ( j ) =kuro ( k ) 
next 

raesa_clr ( ) 
endf unc 


1 t'l td! 13 定 


screen 1,1,1,1 
mouse ( 4 ) ： mouse 
fill(0,O,511,5 
f 24, 40, 1 


console , 
1 ) : pa 1 e t ( 


box( 386,44'<; ( 
locate 4 , ： 
locate 49 , 21 
apa«e( 1 ) ： f i J 
box( 132,229 , 
msarca( 137 , ： 


:print " 残 I 


I7tt p 265, 15) :apage 

？ 9, 377, 487) 

il ( rights I t imps , 2 


究 ffi の 

card , f nc 用 力 


ブラ ツ 

ク ジャック だよ 
by T, Moima i 



pnum , ct , kazu=5 , 
pasa="®59vl 5c" , 


, round 

in- M e56vl5o4132cegb8g" 
, pico="956vl 5o-l 1 20aene" 
wake="e56vl5c" , ti n= "®50v 1 5o6 1 6 4cr " 

int card! 51), hand( 5 ) , kane ( 1 ) 


2380 endfunc 
2390 /* 

2400 func mml_init( )/» F M の W Wl 化 
24 10 m_ini tT> :m_al loc( 1 , 50 ) 
2420 m_aas i gn I 1 , 1 ( :m_trk ( 1 , level 
2430 endfunc 
2440 /* 

2450 func nv_i n i t ( ) /» 変 ft の ネ刀期 化 
24 60 r_od=0: b_od = 0 : g_end = 0 : beg i r 
2470 see = 0 : paaa = 0 : r_ahpet = 2(i : b_s 
2180 endfuno 
2490 /* 

2500 func card — initl l/* 赤と H ! 

2510 int i t .j ,Br=l , sb=0 

2526 repeal. 

2530 for i = 1 to 13 

2540 aka( j } =ar* 13fi 

2556 kurol.j)=sb» 13f i ： j = ,j + l 

2560 next 

2570 sr=sr+l :sb=sb+3 

2580 untill j=2B) 

2590 endfunc 

2600 /* 

2610 func card— placet 1 /» ft 初 の 4 W 
2620 int t , j=3 
2630 for i=0 to 3 

2640 card put ( i , 1 ) : card put ( j , 

2650 next " 
2660 endfunc 
2670 / 聿 

2680 func reverse! »/* カー ト' を R (；>] I 
2690 int 
2700 for 
2710 j= 
2720 next 
2730 endfunc 


*60+M3:r_put| j.com, 


2910 

/* 



2920 


, ； i n 

tl/* 結 s 

2930 

str p t c,m.vd( 1 )= I " 格 ち 

" , •• a 

ナ' 1 

2940 

p=chr$ ( 1 30 )+chr$ ( 79 + v ) 



2958 

c=chr$ 1 130 )+chr$t 79*d ) 



296(3 

m=p+ M »"+c + " 敗で 胃 おの' 

♦ vd ( pr 

J+" で す 

2970 

vpage { 1 4 ) : 1 ocate 20,15: 

pr i nt 


2980 

but ton on ( ) ： mess r 1 r ( ) ： 

but ton 

_off ( ) 

2990 

rp 



3000 
3010 

/* 

f unc bu t ton_on ( ) 



3020 

repeat : mss tat ( x , y , 1 b , r b 

1 ： rnd ( 

) :unt l 1 

3030 

endfunc 



3040 

/» 



3050 

func mess_o 1 r ( ) / * メッセ 一 

ジ 消去 


3060 

locate 18, 1 5 ： pri n t spa^e$ ( 28 ) 

: vpage 1 

3070 

endfunc 



3080 




3090 

Func button— off 1 |/* ボタ ン 

が « さ 

れるま t 

3106 
3110 

repeat ： mas t a t | \ , \ , 1 h , r h 
end f unr 

) ： 1 1 n t. i 
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dinit( ) 
while 1 

aite ( 1 : for i = 0 to 1 : kane ( i 1 =0 : ayoha i 

k i ni 1 1 ) : rounded 

repeat 

els : w i pe { ) 

sf 1 ( ) : bet set ( 1 : round = round + 1 

dea Ml: cdmore { 1 

hante i I syobu ( ) ) 
until kane { 0 ) =0 or kane ( 1 ) =() 
gover ( ) 
endwh i 1 e 


func aite( ) /* 対 Wt 相手の^ 定 

apagef 3 ) ： f i 1 1 ( 8 , 1 1 Z , B7 , 1 Z7 , Z ) 
pnum=rand ( ) mod 3 : nam=pl r ( pnum ) 
symbol (8,112, nam , 1 , 1 ,1 , 15,0) ： Bpage { 1 ) 
endfunc 


for j =0 to kazu- 1 
kput ( i , j , 1 ) 

next 
next 
endf uno 
1、 

func oto( a ; str I 
m_initl \ :m_trkl 1 ,a) 
endfunc 


brpak 
break 
break 
break 
break 
break 
brpak 


274G 1% 

2750 func mesaage(n;int,rt;int)/*> ,; /セージ 表示 

2760 str m 

2770 switch n 

2780 case 1 

2790 case 2 

2800 case 3 

2810 case 4 

2820 case 5 

2830 case 6 

284 0 case 7 

2850 case 8:i 

2860 endswitch 

2870 vpage (14)： locate 18, 1 5 ： pri nt m 

2880 if rt then return り 

2890 button— on ( ) :mes9_clr( ) : button— of f ( 

2900 endfunc 


Push but. Ion t o s t. a i' t ！ 



で すす I 

ちゲ で ま Y 

の" け 天て か 


i i 分の しすで 

ヌ ル まま 

I f 引 赤フり 《x 



赤黒 • BLACK JACK 


127 


I : consol 


680 func wtm( n ) 
690 int i 

700 for i=0 to n*500:next 
710 endfunc 
720 /* 

730 func dinitl ) 
740 random i ze ( val ( mids ( times , 
750 m_as3ign I 
760 screen 1 , 
770 apBgel 3 ) 


symbol ( 
symbol I 


mouse ( 1 ) : mouse ( 4 ) : set mspos I : 
endf unc 

func cdput (x .y t n ) /' 
c_put(x*6O+17 0,y*18O+12U,n) 
oto ( pasa ) 
endfunc 

func oc_oard ( p 1 , n , o f t い 
int cn 

if of=l then cn=hand( pl*3+n 
cdput ( n , pi t cn ) 
endf unc 


時 mi 侍 ち 


i 面 初 m \t 

' 100 + vaJ ( right $ ( 


扎 の 【 


i 表 t: 


ft の 齒 ！fi S *]： 2 

else cn=0 


820 return(a) 
830 endfunc 
840 / 聿 

850 func dcom( ) / 

860 int a , pi , p2 , pt , ps , rr 

870 pl^handptl ( 0 } ： p2=handpt2 ( & ) 

880 if pi >p2 then pt=pl else pt 

890 rr=rand( I mod 5+3:ps=21-pt 

900 if pa>7 then return! 1 ) 

9 1 0 if pa < 3 then return I 0 ) 

920 if ps > rr then re turn ( 1 ) 

930 return! 0) 

940 endfunc 

960 /* 

96Q func ayobu( ) / 
970 int pi , " 
980 mss(" 
oto (pic 
oc card 

if~pl <p2 then c=p2 else c=pl 
pl=handpt 1 ( 1 ) : p2 = handj>t2 I 1 ) 
if pi <p2 then mzp w d else m = pl 
locate 45, 10:print c :utm( 10 ) 
locate 45 , 20 : print m ： wtm( 5 ) 
if c>m then return ( 0 ) 
if c<ra then return ( 1 1 
return ( - 1 ) 
endfunc 


p2 


970 func af 1 1 


2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 


) ： nag ( > 
: pi =handpt 1 


p2 = h/indpf<i ( 0 l 


1010 for i=8 to 99 


2140 

wipe ( ) 



1020 a=rnd( 1 傘 52: 

b=rnd( ] *52 

2150 

apage ( 1 ) 



1030 c=card(a) :c 

ard ( a ) =card ( b ) : c&rd I h 1 =c 

2160 

) else ( 



104 0 next 


217C 

apage ( 0 ) 



1050 endf unc 
1060 /* 


2180 
2190 

(111(190,244,3 
symbol (198 , 252 

6,276," 


1070 func deal ( ) 

1、 » W に カード を 

£ る 

a page ( 1 ) 



1080 int i=0, j=0 


2210 




1090 repeat 


2220 

endfunc 



1106 if i=2 then 

i = i + l 

2230 




Hie hand( i )=card( j ) 

2240 

func hantei { n ) 


'« 19 利 判定 



2250 

switch n 



1 130 until i=5 


2260 

case 0 :msg( " 

払の ほち 

• ) :oto( lost) :wt 

1140 oc— card (0,0,0 

) ： wtm( 1 ) 

2270 

kputi e 

kane ( 0 ) , 1 

:betclr( 0 ) :wtm( 3 

1 1 50 oc_card {1,0,0 

) ： wtm ( 1 ) 

22B0 

kput( 0 

It&ne (01,1 

: betel r I 1 ) 

1160 oc_card (0,1,1 

J ： utm( 1 } 

2290 

syoha i 

0 ) = syohai 

0 ) + 1 ： break 

1 170 oc_card( 1,1,1 

) :wtm( 10) 

2300 


あなたの ほ 

ち'' l:otolwin) :wt 

1 180 oc— card (1,0,1 


2310 

It put ( 1 

kane{ 11,1 

: bete 1 r I 0 ) : wtm ( '.i 

1 190 endfunc 


2320 

kput.{ 1 

kane 111,1 

: bete 1 r ( 1 ) 

1200 /* 


2339 

syohai 

1 ) =syohai 

11+】： break 

1210 func askpt ( n) 

/* 点 » 抨 ffi 

2340 

case - 1 : msg ( " 

引き分け 

' } : otot wake ) :wt 

1220 int a 


2350 

kputte 

kane(0) , 1 

： bete 1 r { 0 ) ： wtm ( 3 

1230 if n=0 then r 

eturn ( - 1 1 

2360 

kput( 1 

kane( 1 ) , 1 

： betel r( 1 ) : break 

1240 a=n mod 13 
1250 swi tch a 


2370 
2380 

r 




5 : hand ( i 
5 1 : card ( 


func msg( m ； st 
if m= " " then 
apage ( 0 ) 


case 1 1 ： 

case 12: 

default: break 
endswi tch 
return ( a ) 
endfunc 


340 func handpt 1 (pi 1 


break 
break 
break 


> If fifi 


a = askpt(hand(pl*3 + i ) ) 
if a=- 1 then break 


return ( n > 
end f unc 


450 func handpt2{pl ) 


a=ashpt ( hand i pi ) ) 
if 1 then break 
if a=l and af =0 then a=l 1 :af= 
n = n + a 
next 

if n>21 then n=0 
return ( n ) 
endfunc 

func cdmore ( ) /* 力' 

if jresno ( ) then hand ( 5 } roard ( ct ) 


if dcoml ) 
endfunc 


then hand ( 2 ) =car 


620 func yesnol 


apage ( 0 ) 
fill|310,383 
f 111(350,383 
locate 39 , 24 
repeat 

mspos t x , y ) 
a=point ( ; 


print yes 


or &= 1 5 then a= 


msBtat ( x , y , 

until l+r<>0 

apage ( 1 ) 

switch a 

case 3 ： a= 1 : 
case 5 : a=0 : 

endswi tch 


break 
bre&k 


2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790 
2800 
281Q 
2820 
2630 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 


kput ( pi , n , f ) 


表 T 


swi tch pi 

ease 0 : y= 1 28 : break 
case 1 : y = 320 : break 

endswi tch 

x= (n mod 5 ) * 16 + 8 


oto( tin) 
kane ( pi ] 


: It t\ne ( pi ) + 


,x+15,y+15, 
= kane ( pi J- 1 


apage ( 1 ) 
endfunc 
/» 

func betaet { ) 

kput ( 0 , kane ( 0 ) - 1 , 0 I 

put(96, 1 12, 1 1 1 , 127 , 

wtm ( 3 ) : kput t 1 , kane i 

put{96,304, til ,31», 

endfunc 

/* 

func bete 1 r ( n ) 
int y 

if n=0 then y=l 12 e 
epage(2) :fill(96,y, 


apage ( 2 } : o 
oin ) ： apage 


: apasef 


金 を 表： 


wtmt 3 ) 
： I :oto( 
wtml 3 ) 


/* け 金 を； 
, y+ 1 5 , 0 ) : apage ( 1 


func gover ( ) 
int a t win , lc 
str winner 
els ： apage ( 0 ) 
win=syohai ( 1 
i f kanef 1 ) =C 


loat=syohai ( 0 ) I winner = 


winner=pl r ( pnum ) 

} 

ave= ( win* 100 ) / ( round- ( round-win- lost. } ) 
ocate 22 1 1 1 :print winner :■' カ（ B) ち ま し ft" 
ocate 22, 13 :prinf ラウンド！^ "； round 
ocate 21 , 1 5 : print win;" |S " ； lost ; " 敗' round - 
ocate 22 , 17 :print" M 率 は "； ave ； "X です" 
ocate 22,20:print"click mouse button ！ ！ " 

repeat :msstat(x,yil ( r) :until L+r<>0 

wipe ( ) : cla : apage ( 2) : wi pe{ ) ： apage { 1 ) 

endfunc 


-lost に' 分'' 
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X68000 用 

風の 谷の ナウ シカ 

Xl/turbo 用 

フジ >n 本 探 弟 一 


Ando Masahiro 

安藤 正洋 


Kamio Souichi 

神 生 総 一 


S 曰 暑い 曰が 続きます ね。 さて 今月 は， X 
68000 用に は 「風の 谷の ナウ シカ j を， そし 
て X1 用に はこの 時期なら ではの 「ラジオ 体 
操 第一」 です。 さすがに もう 近所の 小学校 
に はい きづら いでし ようし， 朝っぱらから 
ラジオ 体操なん て 元気 はさら さらない でし 
ょラ から， これ を 打ち込んで 密かに 部屋で 
ラジオ 体操して < ださい。 



待ちに 待って た 安田 成 美の デビュー 曲 


かなり 前の 話 （1990 年 3 月 号） で 恐縮な 
のです が， 「風の 谷の ナウ シカ」 が閒 きたい, 
それ も 安田 成 美さん が 歌つ て たやつ 力な 、い， 
てな ことをこの ページで 蒈 いたんです。 な 
んて わが ま ま なお 願いなん だろ う と, E. いつ 
つも， 催促 3 なんて^い たんです よ。 そし 
たらね， 嬉しい じゃありません 力'， 常連の 
も' 藤 君が 一肌脱い でく れ たんです よ。 なん 
といっても 6 年 も 前の 曲 だし， サントラと 
違って イメージ ソン グ だか ら テープ だつ て 
入手 困難だった でし よ う に …… 。「参考に し 
た もの H 刊 明星 1984 年 7 月 号 付録 YOUN 
GSONG」 つてい うのが 9: かせます よね。 

実は 4 n に 投稿 し ていた だいて たのです 
が， 諸般の 事情 に よ り 掲敝が 延ば し 延ば し 
になって いたのです。 ごめんなさい。 もと 
も と の llll がそん なに 派手で はないた めに， 

近頃の OPMA SONGS と 比べ ると ちょつ 
と 寂しい よう な 気がする かも しれません 力-:, 
確かに こ う いった 雰囲気の 曲でした。 （|A| 入 
的に はバッ クの 才力 リ ナが細 野 さんら し く 
てと つても 好きです。 


今日は 泉 岳 寺から お送り します 


「夏」 つてい つたら 海 や 山 もい いけど， 
子供の 頃に やった ラジオ 体操っての もい い 
もんです よね。 まあ， やって た 頃 はめん ど 
くさい も ん だつ た よ う に記惊 してます けど 
も。 スタンプ 集めて， 最後の 日に 何 か を も 
らうっての は どこでも やって いる ものな の 
でしよう か？ 私 は 花火 セット か ノート だ 
つたよう に 記憶 してる ん です け ど。 今 現在 
で ラジオ 体操 を やって いる 入， 何 を もらつ 
たかはつ きり 党え ている 入 は 「ラジオ 体操 


• 私 は これ を もらった」 係まで よろしくお 
頃い します。 

と， ここまで 書けば 曲 は 自然に 聞こえて 
きます ね？ そう， ラ ジ才 体操です。 タ ィ 
ムリーで しょ？ ちなみに 第一です。 ラジ 
ォ 体操 第二 を 「ラジオ 体操」 つてい う 曲の 
2 番 だと 思って いる 入 もい るよう です が， 
そ れ は 間 違いです。 作曲者が 遠う のです。 
第一 は 服 部 正さん， 第二 は ffl 伊玖磨 さんな 
のです。 よく' 这 えてお きましょう。 試験に 
,4'i るか もしれ ません （ん な こ た ね一）。 そ 
れ では i も 近の カラオケ ブームに あやかって 
今回 は 特別に 歌詞 （？） を 載せて しまい ま 
しょ ラ。 

• 腕 を 前から 上に 举げ て， のびのびと 背 伸 
びの 運動から， はい， 
• 1234567 手足の 運動 
• 12345678 

• 1234567 腕 を 回 します 

• 外 回し 内 回 し 5678 

• 123456 胸の 運動 足 を 開いて 

■ 横 振 り ななめ 上 5678 

• 123456 体 を 横に 曲げる 運動 

• 12345678 

• 123456 はい 下に 曲げ ま しょう 

• 3 回〜 手と 腰 後ろに 

• 123456 腕 を 振って 体 をね じる 迚動 
• 左右 左右 左に 大き く 78 
• 右左 右左 56 足 を 戻 して 手足の 述 動 
• 12345678 

• 123456 足 を 横に 出 し て な な め 卜に 
• 正面で 起こ し〜 78 

• ~34~11 お を 振って 体 を 回す 運動 
• 1 • 34-78 

• ~34 〜足 を 炭して 両足 跳び 

• 1 • 34 開いて 閉じて 開いて 閉じて 

開いて ffl じて 手足の 運動 

• 12345678 


安田 成 美 

• 123456 のびのびと 深呼吸 
• ~ 34-78-34-78 

* 指導/柳 川英魔 
注 ： 上記で"〜" と ある！： ころで は 喋って 
い ま せん。 2 拍 分です ので タ ィ ミ ングを 取 
ると き に 注意 してく ださ い。 同様に " 1 • 
34" では " 2 " の 音 （ 1 拍分） を,' I', していな 
いこと を 表して います。 惯れ ない と " 123 
…… " を 後ろの ピアノに あわせて 音程 を 取 
つてし まいが ちです 力 f , 練習 すれば ちゃん 
と 歌える （？） ようになります。 歯切れよ 
く， 元気に， 自分 を 捨て去って: K うのが コ 
ッ です。 ちゃんと テープから 採 ぉ1 したので 
間違い はない はずです。 あと は， 「今日は 
千代 田 区の 宝 珍 小学校の 校庭に 2 年 C 組の 
皆さんに 集まっても らいました」 のよう な 
ノリの もの をァ タマに 付ければ， ほ ば 完璧 
といえ ます。 なお， この 曲 は XI の MUSIC 
BASIC 用です。 音色 デー タ は VIP に 人つ 
てきた 「PLUCKED , VTD」 を 使って く 
ださい。 そのまま ロードす ると BASIC を 
破壊して しまい ますので， 

LOADM"PLUCKED.VTD",&hB000 
と してから 閒 いて く ださい。 琴の 音色 を 選 
択 している ようです 力 f ， やはり 正統派の ピ 
ァノ でも 鳴らして みましょう。 作者の 神 生 
君 は MML 歴 1 カ片 だそう です。 呰 さん も 
負けずに 投稿して くださいね。 （S.K.) 

Oh! X LIVE in '90 J 29 



リスト 1 風の 谷の ナウ シカ 


日本 音楽 著作権 協会 （出） 許諾 第 9071006-001 号 


OPMA VKRRIOS 

^sxc h>- « if an ^ 

Programed by 安 （| U 

SOUND DATA 
char HHSHl 4 , 101= { /* 


m_vset ( 
dim char 


m_v8et(71,CLAVES) 
dim char し' YMBA し I '1 , 


_vaet( 72, CYMBAL) 
im char SYSBASSf 4 


dim char 


m_vset 
dim char 


ra_vaet ( 75 , STRING32 ) 


vset(76,BRASSl ) 


810 m_vaet( 


din char SYN3I 


880 n_vaet(80,SYN3) 
890 dim char SYN4I 4 


950 m_vBet( 81 , SYN4 i 
968 dim char SYN5( 4 


ieee 

1010 
1028 

1030 
1040 
1056 
1060 
1070 
1080 
1090 


■_vset(82 
din char 


O.HHSH) 
CLAVES(4,1 


l.SYNBASS) 
STRIKCS1 【 


, .STRINGSI ) 
STRINGSZI 4 


' .BRASS2 
SYN1 


8 ,SYN1 
SYN2( i 


,SYN5) 
SYN6(4 


i , SYH6 
SYN 7 I ' 


rinf スト リンク 


m_vset(85,SYN8( 
dim char BRASS3( 


_ vset(8G 
i m char 


370 ra_vaet ( 87 , LEAD) 


11256) ,d 


ncl i ,5000 ) :m_ 


= "»87q818o4vl ly48,20 I :6rl : I 

=" I :dddee2dd4ee2r + -t .e4d| I>a2.r2: I \'£<H2,r2 

=" I ： >a<ddd4d4dd4.c+| lr + 4r + > ba2 . r4 r I < : I I 2c+ '、+ I 

= "vl2f + f+f*f+f+e'l . bf+-1ed2deffdef+ef+<?d4d2i-4 
= "f>f+f+f+f + a" ,bf + 4ed2def>def+ef>ed4dedc + df + 
2, ,r4.vl2dAedt?+dvl 1 f+2e2d2c42 


m_trk( 】 
m_trk ( 1 


next 
next 
next 
next 


0】="e74q818o«lvl0 c4&> { b&b- ) a4& ( a-&g I I efre- I 

c4dedc+def>gf+ef+gabagab<c«} Id2e2 

«78o2v9 d4f4e4c4d4f4{efe)dc4 
085o2v 


q8f + 2 


v6dv8f+| v9q4a (ab]q8alla2 I 


vlev6f+v 


1 (ab<c*dc+d) ■) 


>a4< ： I 

="883o3 I :rlv3 
8g) V9q4aaaq8a4a4q4gf+q8e 

"r4< )dc+|d4q4> ba2q8gl6f +8 . e2 . 
M «74o3vl0 r(ab<c+dc+>b[4r4 (ab<c+de+>bl 4 
16araaeear 18 

="974o4v7y50,40 1 16 f t2r8q4af + f +c+gf +q8 f *2r8q4«f +f +>a<« 
+ q8f *2e2d2vl 1 ( dc+ > bv 1 0agf -f gab< e+de ) 2 1 S ySl ,0 

"•74o'lv7y50,40 1 16f + 2r8q4gf + f+c+Sf+qBf + 2r8q4gf+f + >a<« 
e2dll8 y51 ,8 

J = "v8dld2c+2c*-2>Bf+daf+l>v7blb2b-2 


J = "«74o4vl0 c4&Mb&b-)a4&(a 
lb<c+def+8l2 

) = *"974o4vlO c4&>{b&b-|a4&(a 
: next 


&g ) f +4 & (e&e-)d4 . > ( vl lab<c* 
■&g) f+4&(e4e-}d4.v9c+2< (v7c 


m_trk 
mltrk 
ra_trk 
m_trk 

m_trk ( 


:next 
:next 
: next 
: next 
: next 

: next 


0 )="086q818o4v8y5R, 40 c4 . >a4 . f+4 .dZ . . f+l<d2e2 y5O,0 

2) 二" I :7rl: |r>2 a81o3vl 1 ec+>ag 

3) ="874olv7 I :3a2b2<32o+2> ： I 

4) ="a2b2<d2c+2 

5) = "e75o2v8 a4 . (ab<o+dc+ >b J 4b4 lab<c+ I |dc+>bab<c+dc+def*g 
) 2L16arsaeearl8 

= "884o4v7 f+f + 4f+dd4de2r2ee-tec+c + 4c+>a2r2 I : 1ra<a4> : I 


«77o4v9 116d8>aaa8 
6aaa8 


a8977>Baa8<dd: |d8>aaa8<« 
)="«86o4v8y50 
)="«86o4v8y50 
ic*14 ( v6c+4v3c+4v0c+ } 4 y50 , 0 


m_trk 


2000 
2030 


076aad77d8>aaa8<dd| :d8>Baa8<0T6aa 
5a&v7a&v9a&vl0a|8&vl la41B 
4 . f +4.d4 .a4<c+4 y50 ,0 
4 . f+4.d4 . v7c + 2< ( v6c+4v7c»4v8c+ I 2 


) : next 
) : next 
) : next 
} : next 
) : next 

) : next 


2050 a 

2060 a 

2070 a 

2080 a 

2090 a 


m_vaet(84 ,SYN7 ) 
dim char SYN8( 4 


9?6q818o4v8 cl . >a I . f + 4 .d2. . f f ! 
0?9o2v<) dldl 

«79a2v4 I : d 1 > b2b2g2e2<d2c+^ : I 
082o3v5 I :3f + 2g4f + 4e2e2: I 
f-t2g4f+4e2e2 

f+2g4f+-le2r «76o4v10 1 16aaeea: 
979olv4 b2b-2b2<c2>b2b-2h2h4«l 
079olv4 b2b-2h2<cZ>b2b-2al 
086o4 ( v3f+*v»r+4v5f+4v6f+iv ~V 


=a( 1 )+"dl 980o3 1 vfldfcv ldiv2d*v3dA\ -tH ！ 2\v5d2 
) = "d76o4v8 c4 . >at . f+4 .d4.c>4a4 


next 
next 
next 


130 Oh! X 1990.9. 


► ゲーム ボーイ LIFE (Vol. 2) 
戦か？ 


"試験に 出 ない ゲーム ボーイ 講^" と は W 氏に 対する 祧 
吉田 谀 一 （19) 山形県 


) I : npxl 


2220 m_trk(4,a(10( ) 

2230 for i = 7 to 8 : m_trk ( 4 ,a( i ) ) :next 
2246 m_trk(4,a(lll)~ 
2250 /» 
2260 /* 

2270 a{0) = "977qei8o4v8 c4 . >a4 . f +4 . H2 . .f+Kd2**2 
2288 a( 1 )="«79olv4 alal 

2290 a(2) = "»79o!v4 t ： a 1 f +2 f + 2d2 >b2 < h2a2 ： t 
2300 a(3) = "»82o3v5 | : 3d2d4d4d2c+2 ： I 
2310 a(4»="d2d4d4d2c+2 

2320 a(5)="d2d4d4d2r «8So3v8 1 16a«eearl8 
2330 a(6 (="»79olv4 g2f+2ft2a2g2f+2f+2a4el 
2340 a(7)="»79olv4 «2 f +2f +2a2g2f +2 f 1 
2350 a(8) = "ft80o3v5 f+lc+lf+ldl «79olv'l blgl 
2360 a(9 )=a( 1 e80o3 | 、+0a&v U4 v2a&v3a4v4ti 1 2&v 5a2 
2370 a( ]0|= '<l77o4v8 c4 . >a4 . f-» 


<&> B<a> B<a I 


2790 a ( 8 ) = " 


:d<d>d<d).l<il>d<d> >bcb>b<b>b'b'b<h>n«ii -g<«>e' p>e<'^>a 


f<f+>f+<t>>g<g' , g<B>a<a}a<a>B<a>aCa 

I :g<g>g<g>f+<f+)f+<f+>b<b>b<b> I la<a>a<a> : \ 
I iB<g>g<g>f+<f+》f+<f+>|lb<b>b<b>a<a>a<a>: I 


: 4eCe> : 


"»77o4v8 


O79o1 v4 n2<alSr f vria4\ 2a& \ laiv 


) : next 
) : next 
i :next 
) : next 
> ： next 


2390 for i=8 


2450 
2460 


2490 a(0) = "«T5q8J8o2v9 d4 . > b-t . g4 . f?2 - .ala2a2 
2500 a( l)="«79olv4 fl f I 

2510 a(2)="»79olv4 I : fld2eZ >b2g2<g2e2 : I 
2520 a(3)r"882o3v5 > I : 3n2b4a<ta2a2 : I 
2530 Q (4)="a2b4a4a2a2 
o(5)="n2b4a4a2r2 
2550 a(6) = "»79olv4 f + 2c + 2d2f + 2f+2c + 2d2e4c+ I 
2560 a(7)="»79olv4 f +2c+2d2f t2f +2c+2cl 
2570 a(8)r "«80o3v5 el>al<dl>bl< «79ol v-1 elel 
2580 a{9)=a( 1 ) + '*f 1 «86o3 ( vOf Av 1 f fcv2 f iv3 f 4v 1 f I 2 
2590 a( 10) = "«75o2v9y53,28 d4 . > b4 , g4 . e4 . <c+4o+ I 
) = "«7 5o2v9y53 t 20 d4 . >b4 . g4 . e-1 . v8a2< (v6 


2808 a{9 )=a< I 
2810 a( 10(="q 
2820 altl)="q 
2830 for i=0 
2S40 for i=2 
2856 for i=5 
2860 for i-2 


2900 
2910 


： 4d<d> : 


. f +<1 . e4 . <q4c+c*c+c + 
.f + 4.e4.a2<vl1dl4cl2. 


: -)b<b> : 


trk 1 7 


I 1 ： next 

trkl 7 

a( i 

1 } ： next 

trk( 7 


l ) ： next 

trkl? 

a{ i 

) ) ： next 

trkl 7 


) ) : next 

trk ( T 

8( i 

) ) Mlt».\t 


2930 
2940 


d(e)="y2,2r8e70ggy2, lOrSKRy^, 
d( 1 J="y2,2r8e70ggy2 , 10r8gHy2 , 


v6div3dkvOd(4 
2610 
2620 


trk (6, 


2640 
2650 
2660 


: next 
: next 
:next 
: next 
: next 


r8Kgy2, lO071g8«7388 
r8>'2 , 2say2 , 1 0»7 1 g8S70gg 
2950 a(0)="«llr q81 16o4 »72vl5 <S4 . g4 . g4 . g2 . . v8 I : (gggggg) 4 I lv9: 
I I 2vl0: I I 3vl 1 : |vl5«2g2 
2960 a( 1 )="y3,3l ： 3y2 ,2r8970gg : I y2 , 2«7 1 KH«70gg I : 2y2 , 2r8»70gg : I y2 
,2r8y2 , 10»7Oggy2 , 10»71g&y2 , lfigy2 , 2«70gg 
2970 a ( 2 ) = " I : 3"+d{0) + " ： I 

2980 a(3) = " t :5*'+d( 1 )+" : I " + d(0 t + " I ： 5"+dl 1 M" ： l" + d(0) 
2990 a(4)="y2,2r8a70ggy2, 10r8gRy2 , 2rfly2 , 2g«y2, 1 067 1 g4y2 , 1 0gy2 , 2 
«70gg 

3000 a(5)="y2,2r8«70ggy2, 1 0r8ggy2 , 2 r8y 2 , 10gy2 , 10gy2, 10S71g&y2, I 
0gy2 , 10870gg 
3010 a ( 6 ) = " I :4"+d(0)+": I 
3020 a ( 7 J = " I : 10"+d(W : I 

3030 a(8) = " I : 3"+d(0)+" ： I " + "y2,2r8«70ggy2 , 10r8gs(yli , 2r8y2 , 10ggy2 , 
10«7 lgft,v2 , 10S.v2. 2@70gg 

3046 a(9> = " y2,2e72<g4&y2, 10«8y2 , 2g^.y2 , 2«<1&y2 , I 0g8.v2 , 2g8&y2 , 2s 
4y2 , 2r8y2 , 10>e7Oggy2 , 10«7 Ig8y2 , 10970gy2 , lOg 

3050 a( 10) = "y2,2072<s4&y2, 1 0g8y2 , 2g4 . y2 , 2g4Ay Z , 1 0«8y2 , 2g4 .y2,2r 
8>870gs»71y2, 2g8e70gg 

) : nexl 
) ： next 
) : next 
) ： next 
1 ； nexl 


3060 for 


3080 
3090 
3100 


» :m_trk(£ 
J:ra_trk( E 


3:m_trk( 8 
7:m trk (8 


m_trk(6 , 
for i=7 
ra_trk(6 , 


_trk(8 , 


31 30 m_trk ( 8 , a( 
3140 /« 


=-»73q418olvl2 
=" I :8d<d> ： I 


3170 m^play ( ) 


リス 卜 2 ラジオ 体操 第- 


日本 音楽 著作権 協会 （出) 許諾 第 3071006- 001 号 


190 PLAY 
200 PLAY 


i40vl3p3q7=382,8,O, 
i40vl3plq7=3a2,8,0, 
:i4Ovl3p2q7=3B2,8,0 
:i40viep3q7=3s2,8 > O 


60 TEMPO 0 
70 PLAY "t 
80 PLAY '■ 
90 PLAY " 
100 PLAY " 
P し AY ■■ 
120 PLAY " 
136 PLAY " 

ISO PLAY "o518d4f+ . I6adf +ag4b .o6e+ 16do5g bo6do5ao6do5bagf tde t 1 00 
f+dec+d'lt70o4f+4" ； 

160 PLAY ":o118a-Io5d.el6r2d4(t.al6br'l.rltlOOr2. L70r6-lo4a®4 5" ； 

PLAY ":o'118f + 4r2.b'lr2.rttl00r2. t70r32o5d»45"i 
180 PLAV ":o314dao4dr4o2go 


i40vieplq7=3a2, 


rlo314f+o4do3gbt 10ero3«dt70rl6o5a«36" 
rlo314dhe8tl00r2. t70rl6r61o6d«33" 


220 PLAY - "t70o414rf +af + rf+af+o5! 1 25f +1 1 6f +8 . ga8 . b32a32 f + 8 . do5 ！ 1 
5b4bB.o6c4 ！ 12Sd4 .c+o5b! 125a4a8 . ab8 . ad8 . e" ； 

230 PLAY ' : o4«14Sr4r64dr64f +r64dr4r64dr64f +r64dl 4rl rl rl " ； 

P し AY " :o3«14 2r4r32ar32o4dr32o3ar4r32ar32o4dr32o3al4rlrlrl" ； 
250 PLAY " ： o314dro2aro3dro2aro3dadadbdbdada" ； 
260 PLAY " :o214dr2.dr2 . rf+rf+rgrgrf -i-rf ； 
PLAY " ： 


290 PLAY "o51 16 ！ 125f + 8 , ga8 • f + ！ 125e4o4a4o5r 1 25 f + 4 f + 8 . ga8 . b32a32f + 
8.d! 12Sb4b8.o6c+ ！ 125d4 ,c+o5b! 1 25a4a8 . a(ido5b8 . ada , e ！ 1 25 f + 8 . de8 . c + 
！ t25d4o6d4" ； 

300 PLAY *':Hrrrrr2.r64o5ae45" ； 
318 PLAY " : 1 1 rrrrr2 - r32o5 f +»4 2" ； 


0 PLAY " :o314rf+rgrf+rf+rgrgrf+rsraf+o2d" 
6 PLAY " :o314rdrc+rlrlrlr2dr" 


368 PLAY "o5116e4e8.d! 1 25c+8 . o4aa8 . a 1 6o5d8 . c+d8 . e ！ 125 f + 2 f +4 f + B . e 
！ 125d+8 .o4bb8 .bo5e8,d + eB. f+ ！ 125k2o4 ； 125a4f + 8 .ao5! 125d8. o^aa4" ； 
376 PLAY ,, :o518r64c+e45r2.rlr64d+»4 5r2,rlo4 ！ 1 25f +4d . f + 16 ! 125a. f+ 
16f+4" ； 

388 PLAY ":o412r32a»42r.rlr32b»42r .rl ！ I25d4r. ' ； 

39d PLAY ":o214ao3a! 1 1 4ao4c+o3d& ！ 1 1 4 f +a+o2bo3 f to2 ! 1 1 4bo3f +o2eo3g 
o2 ！ 114ao32dada" ； 

460 PLAY " :o314reo2 ！ 1 14ao3arf+o2 ！ 1 H f +o3f +rd+o 1 ！ 1 14bo3dreol ！ 1 14a 
o3eo2do3f+o2do3f+" ； 

416 PLAV ":o314r2.erlrlro2bro3c+rdrd" 

420 ' 5 

430 PLAY "o418! 12Sb4g.bl6o5 ！ 125e . o4bl6b4o5 • 1 25d4o4a . bl6o5 ： 125c+. 
dief+.el6! 125d4o4a.al6o5< 125d4d4o4d4 . ed4o3b4o-lg . al 6b4b2" ； 
446 PLAY ":o41B! ！ 125b, g 16" ! 125a4f + .gl6 ！ 1 25a . bl6ood .c + 
16o4 ！ 125a4a.al6! 125a4B4rlr4gs2" ； 

450 PLAY ":o418! 125e4r2. ! 125f+4r2. ! 125f+4r4 ！ 125f*4f+4rlr2d2 -1 ； 
46fl PLAY " :o314ebebdao2ao3gdaaddddddddd" ； 
476 PLAY 

480 PLAY " :o314rererdrc+rc+dro2gggggr2 . " 


500 PLAY ••o418M25e.al6o5c4o4b4a4g.el6b4ti2o5e4B4f+.832f + ;i2e'lvl5d 

4g4d.vl3e32d32o-l ！ 1 25b4a4o5e4d . e32d32o4 " ； 

510 PLAY " :o414rlred+2o5cedcvl 5o4bo5do4bgvl3eo5co4ba" ； 

520 PLAY " :o311rrrrr" ； 

530 PLAY " :o414cco3babgf + Zcgrgo2j(o3go28o3acaca" ： 
540 PLAY " :o314gBB«eed*2rererdrdrere" ； 
556 PLAY " :o314eecco2bbb2rlrlrr' 


-16dro4bro5drg. 


570 PLAY "vl5o418b4a-lo5d2drd 
Screrd. ！ t !9cl6o5b. ！ 1 19a 16" : 
580 PLAY " :vl5o41 1 f +4 F+4a2rrr" ； 
590 PLAY ":vl5o411r2f+2rrr"; 

603 PLAY " :o214do3f+dal 8gro4dro:idro4dro:iKro4dro3d 


19hlfio6dro5bro 


34dro3crgrdrar 


PLAY " : o314r4do2do3f + r4b8r 
PLAY " :o314rrrdrlrlrl " 


.b8r.e8r. f*8r8'' 


640 PLAY "o518grbrgro6tl4o't 14ao5dvl3f+8 
vl5f+avl3f+d8.el6"; 

650 PLAY ":o614r2.do4ffnr28br2o5df+vl3dr"; 
660 PLAY " :o514rZ.bo'1dr+r2gbr2ao5drZ" ； 
670 PLAY " :o'118drdrdro2g414dadado4do3do4do3dadb 
660 PLAY " :o318brdrbr4 

690 PLAY " :o318gr4 . gr4 . 14ro3drdrargrdrZ 


16d8r8、'l「>dg、'13b8.a〗6g8r8 


710 PLAY "vl5o514f+f+vl3f+el 1 6rl 6o3a^tabo4c4def +8 ■ ed8r8 . o3ba+bo4 
ctdef +g8. f +e8r8.dc+def tgabS .ag8r8" ； 
7Z0 PLAY " : vl5o514ddvl3o+c+rlrlrl" ； 
730 PLAY " :o4Uaavl3aarlrlrl" ； 

740 PLAY " :o214ao3ao2ao3a! 1 1 7dddd8r8 ！ 1 1 7eeee8r8 ! U 7ddee8r8" ； 
750 P し AY " :oll4ao3f+rgoZ ！ 1 17aaaa8r8 ！ 1 17bbbb8r8 '. 1 17aabb8r8" ； 
760 PLAY " :o314rdr2o2! 1 1 7dddd8r8 ！ 1 17eeee8r8 ！ 1 17ddee8r8" 


780 PLAY "O4116rl6ag+bagf+ed8.o3ao4d8r8tl00o518q5f+4f+ga.q8b32a3 
2q6f +db4bo6c+d4 . q8c+ 1 6o5b 1 6q6a4aabade " ； 
796 PLAY ":llrtl00rrr"; 
8Se PLAY " : llrtlBOrrr" ； 

816 PLAY " : o314c+c+dd8r8t 10018qiidaf+adaf + adbgbdbgbdaf+adafta" ； 
820 PLAY " :o214aaaa8r8tl00rlrlrl '* ； 
830 PLAY " :o214c+o+dd8r8tl0Orlrlrl " 


8 50 PLAY "O518f+gaf+t70q7vl5e4o4a4o5f+4vl3f +.gl6' 1 25a . b32a3Z f ♦ . 
16! 125b4b.o6c4l6! 125d4 .c+16oSbl6! 1 25a-)a . o6dl6o5 ！ 1 25b . a 1 6d . e!6" ； 

860 PLAY M :llr2t70r2rrr"; 

870 P し AY " ： Ilr2t7ar2rrr" ； 

880 PLAY " ： o218ao3af +ao2t70q7a4o3g4 Udadadbdbdadb" ； 

690 PLAY " :o314r2t70rerf+rf +rgrgrf*r4g"; 

998 PLAY " :o311r2t70r4c+4rrr" 


926 PLAY "o514 • 125f+8.dl6! 1 25e8 . c+ 1 6do6do4bo5d8 . c+ 1 6do4baf »a2bo5 
d8.c+16do4bt65oSdt60eq8t50f> t40o6d2v8" ； 

930 PLAY ":o5Hr2.r64a»4 5o4gb8.a*16bgr+df+2gb8.a+]6bgt65at60o5c + 
q8t5ed\t4Or64a04S&av0" ； 

946 PLAY " :o514r2. r32f*«42rlrlrl t65o4f tteOgciBtSOa t40r32o5f *«42* 
f+v8" ； 
950 PLAY " 
O 2d2v0" ； 

960 PLAY " :o31-1rgf + o2drlr Irlt65rt60rt50rt40r2v0" 
970 PLAV "O311r2d4r4rrrl4t65rt60rt50rt40r2v0" 


-jifi^lO()'->, おめでとう ございます。 "表紙ぎ やら り い" を兒て 100 号の 長さ と 根! il を^ じ 0hl x L|VE jn -go ； or 

t した。 いや あ， 本当にす ごい。 山上 秀贳 （17)ぉ》;':邯 


★ (で) の ショート プロば一 てい [^^J ^ 


j なさけな くない 星 7 


V 


Komura Satoshi 


古村 聡 


ば一 てい ハンズの ほう も 今月で とりあえす 第 1 部 「 完」 という ことにな り， めで 
た しめで た し。 それ を 記念して （ £ ？) 今月 も 1 本の プログラ^ を 用意して みま した。 

X1 用 ツール 「Date Change「」 と X68000 用の デモ 「なさけない ★ 星 ★」 です。 


皆様， 夏休みい かがお 過ごしで？ まあ， 
この 時期に な り ますって 一と 毎年 書いて る 
ような 気 もす るんで すがね。 休みって な あ 
t. 、いもんで すな あ 一。 夏休みの 目標 「今年 
の S 休み は 大作の プログラム を 作る ぞ！」 
なんて 思わず 力んで しま います。 

で， 朝 マジ メに 起きて 6:30 から ラジオ 体 
操行って， 午前中 に プロ ダラ ム 組んで 夜 は 

9:00 に 寝ち やう なんてい う 才力 タイ 方に は 

関係ないでしょう 力 s ， 朝 は 昼まで 寝て て 
(どういう 日本語 じ や） プロ ダラ ミ ングを 

午前 3 時まで なんてい う 私の よう な 完璧 夜 

型 人間に とりまして， プログラム を 組む と 
きいちばん 気になる の は やっぱり 「その 日 
の 夜食が 何で あ る 力'」 なんです な こ れが 

(こら， そこ！ おめ 一 だけ だよ， なんて 
言わない よ 一に）。 私のお 気に入りの 夜食 
はつつ一 とです ねえ。 えへ へ， 当てて ごら 
ん なさ い。 何で しょう。 え， ポテト フラ 
ィ ？ 耿舞伎 揚げ？ 毒物 飲料の 一気 飲 
み？ あんた ね， なにも 自殺しょう つてん 
じ やな いんだから 。 へへ へへ， 実は 

「鯨の 焼肉」 だつ たりす る ん です な こ れが。 



あれ は 3 年 前， 拙- が 禁止 される ことに 
なって， もう 觫の焼 肉の 缶詰が 食べ ら れな 
く なる と [ifl いた 私 は そ こ ら 中の スーパー や 
ら 酒屋 や らを 走り回つ て 鯨の 缶詰 を 30 缶 ほ 
ど 買い あさつ たんです ね。 んで， 3 年た つ 
たいまで も 20 缶 ほ ど 残って いて そ れ をた ま 
に 「いまでも こんな もん 食べて るの 世界中 
で わし ひとり だろ一 な 一。 えへ へへ へ」 と 
優越感 （優越 缶？） に 浸りつつ 食して いる 
と い うわけ です。 
えつ， なんで こんな 話 をす るの かって？ 
単な る 自慢話に 決 まって る じゃあないで 
す 力 >。 ん へへ へへ。 

曰 付よ， かわれ！ 

さて， そんな 楽しい プログラミングの 役 
に 立つ …… かどう 力' はわ かりません 力 *， ち 
よつ と 便利な ユー ティ リ ティ。 今月の 1 本 

目 は 北海道の 赤 木さん の 作品で Xlturbo 
用の Date Changer です。 

Date Changer for Xlturbo シ リ一ズ 

(CZ— 8FB02) 

北海道 赤 木 陽 一郎 

この ッ一ル は turboBASIC 用です， 注意 
し て く ださ い。 たぶん， 画面 関係 をい じ く 
れば XI BASIC で も 動く ので は な いか， 
と 作者の 赤 木さん も きってい ますから XI 
で 動か し たい 方 はぜ ひ そのよう にして くだ 
さい。 私 はやり ませんで した （漢字が 絡んだ 
ら XI だと めん どく さそう だな と か考 え て 
しまつ たの だ。 力;， よく 考え た ら グラフ イツ 
ク キャラクタが 出て く る だけなん だよ ね）。 

で， この プログラムで なにが できる の 
か？ 読んで 字の ごとく， ファイルの 日付 
や 曜日， 時間 を 変え るんで す。 BASIC で 
FILES を とる と， たと えば， 



Bin* " 0:BASIC CZ8FB02.Sys" '8 

5/10/15 TUE 12:00 
なんて 出て きます よね。 こ いつの 

'85/10/15 TUE 12:00 
の 部分 を 変え られる プログラム なんです。 
ま， 早い話が Human68k でい う と ころの 「t 
ouch.xj なんです ね （しまった， XI ユー 
ザ 一に はます ます わからん じ やない か）。 

では， 使い方 を。 ま ず， turboBASIC 
を 立ち上げます。 で， この プログラムの リ 
スト を 打ち込んで ください。 で， プロ グラ 
ムを セーブ。 うん， ここまで はいつ もと 一 
緒です ね。 で， 今回 は プログラムが 直接 デ 
イス クを いじりに いってし まう ので， もし 
打ち 間違いが ある と 非常に 危険なん です 
(最悪の 場合， その ディスクから L0A 
D , SAVE がー 切で き なくなって しまい ま 
す）。 そこで， 最初 は ディスク を 壊しても い 
いよ うに Format&Copy を 使って ディ ス 
クの バックアップ を 取って ください。 ま， 
壊しても いいような ディスクが あれば， そ 
れで 試して みても いいです 力 5 。 とりあえず 
必要な ディ スク なら ちゃんと 別に 取って お 
くので す。 で， RUN。[1] で 日付， 曜日， 
年の 変更， [ 2 ] で ひ と つの フ アイ ルの 日 付 
のク リア， [3] で オール ク リアです。 とり 
あえず なに かキ 一を 押して みれば， なに か 
向こうから いってく るので わかる ので はな 
いかと 思います。 そうそう， 4 の エンド を 
選択し ない と 日付が 書き込まれません ので 
ご注意 を。 そして， くれぐれも 打ち込みの 
と き は 間違わない よ う 注意 し て く ださ い。 

こ れつて FAT とか ディ レクト リと かが 
わかる よ う になる と 一度 は 作って みた く な 
る プログラムで すね。 私 も FAT と ディ レ 
ク トリの 存在 を 知った ときには， 「フ アイ 
ルの 内容 を ダンプす る ツール」 を 作った お 
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リス 卜 1 Date Changer 


なさけない 女星女 


ぼえ が あ り ます。 
U で システム ディ 
'う一 ん， なつかし 


ちなみに そのと き は 1 回 
スク をぶ つ 壊し ま した。 
い 思い出 だな あ。 そうい 

えば， 最近 は あまり FAT とかの 解説と か 
ス キュー フォーマッタ とかって あま り 見な 
いな あ …… 。 まあ， 今と 
える 必要の ある 概念 じ や 
けどね一。 そ う いや， マ 
ムの テス ト ラン じ や ディ 
いけない なんてお I ら ない 
れな いな一。 昭和 は 遠く 


星に 願い *€: 


なって は あま り 憶 
ないか も しれない 
シン 語の プロ グラ 
スクを 抜かな き や 
人 も 多い のか も し 
な り にけ り。 



では 今月の 2 本 目。 今月の 2 本 目 は埯玉 
県の 遠 藤さん の 作品 で X68000 用 の デ モ プ 
ログ ラム， 「なさけない ★ 星 ★」 です。 

なさけない 女星女 for X68000 

(C compiler PRO— 68K) 

埼玉県 遠 藤 ^之 
C コ ン パイ ラを 使つ て 作 ら れた デモ プロ 
グラムです。 この プロ ダラム を^ 行す るた 
めに は XC(C compiler PRO- 68 K) が必 
要です。 

ま ず， ED.X な どの エディ タ を 使つ て 打ち 
込みます。 コ マン ドモ一 ドで （而 (利で も コマ 
ン ド モードで 立ち上がる ディ スクを 作って 
おいてく ださ い。 ま， メモリ に 余裕が あれば 
VS や SX— WINDOW から COMMAND. X 
を 立ち上げて も かまいませんけ どね …一 ）， 

1) ed HOSI.C 

と し て エディ タ を 立ち上げて リ ス ト を 打ち 
込んで ください。 打ち込み 終わつ たらこの 
リスト （この リス 卜の こと を ソースと いい 
ます） を コンパイルして 実行 形式 （.X フ 
アイ ル） にします。 

2) cc /O/Y/W HOSLC 

こ れで何 も エラ一 メッセ一 ジが出 な け れ 
ば 0K です。 ヱ ラーが 出て しまつ た 場合 は 1) 


//////// SHOKI //////// 
70 WIDTH 80 , 25 th'LIST 0： INITlCLS 4 ： CONSOLE 
80 MAX=1 :RN=16:DIM FA$ ( 60) , DAS ( 60, 4 ) , FI$ ( ( 
90 FOR 1=0 TO 6 ： READ DYS ( I ) :NEXT 1 
100 DATA SUN , MON , TUE , WED , THU , FRI , SAT 
110 LOCATE 12,0： COLOR .1 ： PRINT "ぐく < " ； SP( 

: LOCATE 22,0: PRINT "Date Change 


120 CONSOLE 1,3,1 
12S 

み 中 ！ j " ； 

130 DEVI$ DEV$ ,RN 

140 FOK 1=0 TO 3 ： 

150 FOR 1=0 TO 3 ： 

16C RN=RN+1 :GOTO 130 


ズし S: COLOR 
CLS ： COLOR 


: PRINT 
: PR TNT 


=MTDS ( 
=MID$ ( 


1*32 + 1 , 
1*32+1 , 


25:DEFINT 


or"; -'COLOR 
IMPUT "DRIVE 


" ； : COLOR 6 
: PRINT ■' 


. =",DEV$ 
S み 込 


:GOSUB 630 :NEXT 
:GOSUR 630:NEXT 


186 ' //////// MAIN It 翁 1 1 1 翁 I 
190 GOSUB 710 

206 COLOR 7 ： CONSOLE 2 , 2 , 4 , 76 ： INPUT 

3. -ALL_CLEAR 4 . .END SELECT! 1-2 »" ； A: IF A 
210 ON A GOTO 220,400,450,510 
220 ， //〃//// DATE— CHANGE //////// 
230 CLS: PRINT "DATE CHANOE SELECTINn. 
F A<1 OR A>MAX THEN 230 


. DATE^CHAKGE 2. .OKE_rLEAR 
： IF A< 1 OR A" THEN 200 


240 CONSOI.F 


250 PRINT ■■ DATE&TIME 
ALt"&H"+LEFT$(DAS(A,l ) , 1 
) )-\) ,2) '," /" ； RIGHTS ( "0"+DAS 


OCATE 12,7: PFTNT "FI し JiNAME 


； RIGHTS( "0"+RIGHTSiSTR$ ( 
LEN(STR$(VAL( '■ " ( DAS 1 A , 1 > , 1 ) 


260 PRINT DYS( VAL に W + RIGHTS 

( DAS I A, 

1 ) , 1 ) ) ) ； " " ； RIGHTS ( 

0"+DAS( A 

， 3 > , 2 > ； " : " ； RIGHTS) "0"4-D 

A9( A, 4 

) ,2) 



270 LOCATE 16,10 

： INPUT 

"Input 

Year 

";B$:B=VAL(B$) :IF 

J<0 OR B> 

99 OR LEN( BS ) <>2 

THEN 2 

70 




280 LOCATE 16,11 

： IN PIT 

" Input 

Month 

" ； C$:C=VAHC*) :IF ( 

；<0 OR C> 

12 OR し EN|C$J<>2 

THEN 2 

80 




290 し OCATE 16,12 

： IN PIT 

"Input 

D&y 

" ； DS :D=VA し （DS) :IF 

)<0 OR D> 

31 OR LENICS ) <>2 

THEN 2 

90 




300 LOCATE 16,13 

： INPUT 

■' Input 

Week 

" :E$ :E=- 1 :FOR 1=0 ' 

「0 6 ： IF D 

Y$( I )=E$ THEN E= 






310 NEXT I :IF E= 

-1 THEN 

300 ELSE ES= 

RIGHT$(STRS(E) , 1) 


320 LOCATE 16,14 

： INPUT 

" I nput 

Hour 

" ； FS:F=VAL(F$ ) :IF 

~<0 OR F> 

12 OR し EN(FS><>2 

THEN 3 

20 




330 LOCATE 16,15 

： INPUT 

" I nput 

M L n ii t e 

'■ ； CS:0 = VAHG$) :IF ( 

}<0 OR G> 

59 OR LEN(G$ J <>2 

THEN 3 

30 




346 LOCATE 18,17 

： COLOR 

4 ： PRINT BS ； "/ 

" ； RIGHTS ( "0"+RIGHTS 

STRS(C) , 

LEN(STR$(C) )-l ) , 

2) ；"/"： 

D$;" " 

； DYS IE) 

；" ";FS;" :"G$ 


350 LOCATE 20, 18 

: COLOR 

7 ： INPUT "Are 

you right { Y/N ) " ; AS 

IF AS="Y 

" OR A$="y" THEN 

370 






370 DD$(0)=B$:DDS( 


\$<>"r\" THEN 350 ELSE 


380 FOR 1 = 9 TO 4 ： DAI ( A , I ) =0DS I I ) ： KEXT I 
390 CLS : GOTO 190 

406 ， //////// ONE— CLEAR /〃///// 

410 CLS: PRINT "Input number f 1-" ； MAX ； ) 

420 IF A< 1 OR A>MAX THEN 400 

430 FOR 1 = 0 TO 4:DA$(A,I ) = " 60 "' ： NEXT I 

440 CLS: PRINT "Ok. " ： PAUSE 1 0 : GOTO 190 

450 ' //////// ALL— CLEAR //////// 

466 CLS ： INPUT —Are you sure I WM " ； \S ： I 


THEN" 160 ELSE 


490 DAS( I , J ) = " ( 

500 C し S: PRINT ' 

510 ， //////// 

520 CLS ： INPUT ' 


3" ： NEXT J: NEST I 
Dk. " ： PAUSE 20： GOTO 
END //////// 
\re you sure ( Y/N 1 


530 IF A$<>'"K" AMD ASO "n" THEM 520 ELSE GOTO t90 
54C CLS ： PRINT "File 書き込み 中 ！！" 

550 FOR 1=1 TO MAX ： FOR J = 0 TO 4:MIDS(FIS(I),2d + J,1) =CHRS ( VAL( " 
"+DA$ ( I , J ) ) ) :NEXT J ： NEXT I 

560 FOR 1=0 TO MAX¥8:XS=" " ： YS="" ： FOR J=0 TO 3 
570 XS=X$+FIS ( I*8+J+l ) :NEXT J ： FOR J=4 TO 7 
586 Y$=VS+FIS( I*8+J+l ) ： NEXT J 

590 X$=X$+STRINGS( 128-LEN(XS) ,&HFF1 ： YS=YS+STRING$ ( 128-LENIVS) , 


'し S : KEY0 , "FI し ES " ( ) +DEV,$ + CHRS 1 ^ 


660 DE VO$ DKVS, 16 + 1 , X'S , 
610 NEXT I 

620 CONSOLE 0 r 24 :KLIST 
H22 )+CHR$( 13 ) :END 

630 • //////// FILES READ III m 1 1 

640 IF ASCI し EFTS<DTS, I 1 >=&HFF THEN RETURN 〗 70 

650 IF ASCI し EFTS I DTS , m =&H0 OR MAX>60 THEN RETURN 

660 FI$(MA\')=DTS : FAS ( MAX ) =MIDS ( I1TS ,2,13) + ". "+MTDS(DTS , 


(MrDS(DTS t 25+J, 


680 DA$ (MAX, J )=HEXS ( 
690 NEXT J 

700 MAX=MAX+1 ： RETURN 

710 ， 1 1 II I If I FILES PR TNT ズ /////// 
720 COLOR 5:CONSO し E 4 , 2 1 , 0 , 25 •■ C し S : FC 
HT$ I "0'" + STRS ( I ) , 2 ( ； " " ； FAS( 1 ) :NEXT I 
730 CONSOLE 4 ,21 ,26,25 :CLS ： FOR 1=21 
EXT I 

740 CONSOLE 4 ,21 ,52,25 :CLS: FOR 1=41 
EXT I 

750 RETURN 


t TO 20: PRIST 
) ： PR I NT "No. " ； 
)： PRINT "'No. '* ； 


(で） の ショー ト プロば 一て 
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に 戻って エラ一 の 出た ところ を 直して くだ 
さい。 そのと き エラ一 の 出た のが 何 行 目 力， 
憶えて おいて， エディタに 入って から， 

[esc] + 行 番号 + リターン 
とすれば， その 行に 飛んで くれます。 

さて， これで ディスク 上に HOSI.X がで 
きました ね。 それで は 電気 を 消して くださ 
い （まさ 力、 昼間に 打ち込んで るなん てこ 
とはありません よね）。 でもって コマンド 
モードで， 
A>HOSI 

と 打って しばらく 侍つ と …… 。 X68000 の 
ディ ス プレイ は 宇宙船の 窓と なって あなた 
は 星の 世界 を 飛んで 行く …… ， という 次第 
でございます。 ん でもって 何 かの キ一 を 押 
せば おしまい。 

え， なになに， 投稿 原稿に よれば， 
「 …… これ は， BASIC でも 簡単に 組め 
るので すが， C コンパイラ を 買った から わ 
ざ わざ C で 作り ま した。 …… 利用 法 はまず， 
ただ 見て いる だけで よいので すが， ゲーム 
の エンディングの バックに 使ったり， 特殊 

効果で 仮に ワープの ときに ト ン ネルの 役割 
をしたり と いろいろと 役に立つ と 思います。 
あと， 『r + =10 + nid ( ) *10』 の 前の 10 
を 変える ことによって， いろいろな かたち 
に 変わ り ますので 暇な 人 は 変えて みて く だ 
さい …… 」 

だそう です。 う一 む， えらい ぞ， その 見 上 
げた 根性。 コンパイラ を 買って しまった 力' 
らに は， とにかく 使って しまえ。 うむう む， 
こ一 でな くつち やね。 プログラム 的に は 
ちょっと 短い し， なんか X—BASIC つぼい 
感じ （コンパイラの 場合の 画面 設定 は 間に 
合わせで も 付けた ほ一 がいいよ） です が大 
変 頑張って く れま した。 拍手， 拍手 （パチ 
パチパチ）。 あ， ちなみに リスト はちよ つ 
とば かしい じってし まいました。 ごめんね。 
ォ リ ジナル の 星の 色の パレ ッ ト コード は 255 
だった ので， も しそつち の ほう 力な、 い と い 
うので あれば 直して あげてく ださい （ほ 力 1 
にも ちょっと いじった けどね）。 そうそう 
彼 は 変数 表 も 付けて く れま した。 
変数 表 

X ， Y ： 星が 出る 位置 を 表す 

XI, Y1 ： 星 を 描 〈ときの （X， Y) の 

増加 量 を 表す 
R ： 描く ときの 角度 を 表す 
C ： カラ一 を 表す 
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I ： 半径 を 表す 

D ： ループに 使う 

うむう む， よい 心掛け じ や。 皆 も 見習う 

よ う に。 

さて， 1： とはいえ 夜 は 涼しい し （昼に 比 


ベる とね）， 星で も 見上げながら プロ グラ 
ミン グに精 を 出します カソ うつ， しまった。 

わし， 近眼で 星が よ く 見えな! • 。 

お あとが よろしい ようで …-" ， つく てん 
てんてん。 


リス 卜 2 なさけない 女星女 


1: /* ★ 星 ★ */ 

2 ： ま include < has ic0 . h > 

3: ^include <conio , h > 

4: ^include く stdlib.h> 

5 : # i ncl ude <math . h > 
6: 拳 include <graph - h> 

7: #include < i ocsl i b . h > 
8 : 

9: void main( b_argc , b argvl 

10: int. b_argc ； 
1 1 : char *b_argv 〖 ] ； 

12: { 

1 3 : register int. x , y ； 

1 4 : reg ister int x 1 , y 1 ； 

1 5 : reg ister int r = 0 , c , i , d ; 
16: 

17： /* 初期設定 */ 

18 : screen (1,2,1,1); 

19: console! 'NASI' , 'NASI ' , 0 } ; 

20： b_csw( 0) ； 

21: cls( ) ; 

22 : vpage( 0 ) ； 

23: apage ( 0) ； 

24: printf (" おまちく ださい ！" ) ； 

25： 

26: /* 画面 を 描く */ 

27 ： whilet r く 360 ) 

28： { 

29： r += 10+rnd( ) *10 ； 

30： x= 256; y= 256; i= 0; 

31: x= x+cos{r*pi( )/180)*4; /* 追加 部分 */ 

32: y= y+sin(r*pi( )/180)*4; /* その 1 */ 
33： 

34 : while{ 1 ) 

35： { 

36: c= ( (c+1 ) % 30》 + l ; 

37： i += 1; 

38： xl= cos{ r 聿 pi() / 180 ) * i ； 

39: yl= sin( r*pi ( ) / 180 ) * i; 

40： line( x , y , x+xl , y+yl ， c , Oxf f f f ) ； 

41: x += xl; y += yl ; 

42: if { x<0 || x>51 1 || y<0 || y>511 ) break; 

43： ) 

44： } 
45： 

46: /* パレ ヅ 卜で 色 を かえる */ 
47： 

48: cis( ) ； 
49： 

50： for( c=l ； c く 31 ； C + + ) 
51: { 

52： palet《c,0> ； パ 追加 都 2 */ 

53： J 

54： 

55 ： vpage ( 1 ) ； 

56 ： whilet kbhit{ ) == 0 ) 

57： { 

58: for( c= 1 ； c<31 ； c++ ) 

59： { 

60： palet (c , 0x84 le ) ； 

61: for( d=0 ； d < 2000 ； d++ ) ； 

62 : palet ( c , 0 ) ； 

63： } 

64： ) 

65: screen(2 ,0, 1,1)； /* 追加 部 3 */ 

66 ： OS_CURON( ) ； 

67 ： } 


(で) のば 一て い 八ンズ 


(その S) 


ああ， 感動の 第〗 部 完 


はいはい， 皆さん こんばんは。 ぱ一 てい ハン 
ズの時 聞です。 

さて， 今月 はば一 てい ハンズ 第 I 部 1 " ゼビモ 
ドキ編 _] の II 終 回と して ゼビ モド キ ゲームの 当 
たり 判定の プログラムの 解説 を やって しま うの 
です。 ず 一つと この コーナー を 読んで くれてい 
る ニコ ちゃんの 皆さん は ご存じ かと は 思う ので 
すが （ちなみに， ニコ ちゃんの 対語と して コマ 
ッ夕 ちゃんが あると いう の は 私たちの 世代に し 
かわからない， ど一 しょ もない 余談だった りす 
る） ，当たり 判定に は （で） の ショート プロば 

一て い 5 月 号に 掲載の sp_chk ( ) を 使って し ま 
うのです。 う一 ん， 手抜き 手抜き。 ちなみに sp 
— chk ( ) は 6 月 号の Oh!X 特製 ディ スク にも 入 
つてい ますので 打ち込んで いない 人 は そちら か 
ら 持って きて くださいね （6 月 号 もない という 
人 は …… ， 私 は 知らない …… ）。 

で， 当たり 判定な のです が， 知っての とおり， 
もし， これがなかったら いつまでも 点 は 入らん， 
自機は 死なん， 意味 もな く 永遠に 空間 を さまよ 
わなくて はならん という， シ ユー ティング ゲ一 
ム にはなくて はならない， まるで コーヒーに ク 
リーブ （ふつ， 古い）， お好み焼きに オタ フク 
ソース， SX-WINDOW に 2M ノ、' ィ ト RAM のよ う な 
存在な のです。 

世の中の ゲームの 当たり 判定と いう といろ い 
ろ あるので すが， 今回 どのような 方針で いくか 

r 自槻の タマに 敵が 当たって いるか どうかの 
チェック」 

「自槻 に 敵 or 敵の タマが 当たって いるか どう 
かの チェック」 

の 2 回に 分けて 行って しまう のです。 なんで こ 
ぎ やん やや こ し一 こと をす るん じ やい！ とい 


う 方 もい らっしゃる かもしれ ません が， はっき 
リ いって， 「sp— chk ( ) がそ一 ゆ一 仕様に なつ 
ている から」 という だけの 理由なん です。 他意 
はあり ません。 

もう 少し 詳しく 説明す ると sp chk () の 持つ 
ている 機能と いうの が， 

「指定され た I 個の ス プライ ト とほかの スプ 
ライ 卜が 重なって いるか どうか」 
を 見る ルーチン だから， 敵に ついて と自 機に つ 
いてと I 回 I 回 分けて 考えて やら なきやい けな 
いんです ね。 これが たとえば アーケード マシン 
みたい に， どれでもい一 から 当たったら 教えて 
ねとい ぅス プライ 卜の 衝突 一 り 込みが ある マシ 
ン （あるいは ソフト） だと それ 用の 割り込み 
ルーチン を 作って あと は 果報 は^て 待てと いう 
3 年 寝太郎 方式 も 使える の だけど。 ま. これ は 
これでよ しとし ましょう。 そ一 ゆ一 わけです。 

屋根まで 飛んで, こわれて 消えた 

いま 思つ たんだけ ど シャボン玉の 歌って， な 
ん かとっても シュール じゃあり ません ？ 深い 
意味 はないけ ど。 

ま， それ はいいと してまず は タマの 当たり 判 
定で すね。 タマの 当たり 判定と ひとことで いつ 
てし まう と それし かやらない よ う な 気 も します 
がそん な 二と はありません。 シュ一 ティング ゲ 
—ム のへ そだけ あって いろいろ やる ことがある 
ん です。 まず， タマの 当たり 判定 をし ます （あ， 
当たり前で すね）。 1 1 10 行で sp_chk() を 使って ま 
すね。 ここで ループ を 組んで いるの は， この 
ゲームで は タマが I 画面 中に 3 発出せ るんで， 
それ を I 発ず つ チェ ック しにい つて るんで すね。 
で， 当たって いた 場合 は， 
dafire ( ) 

という サブルーチンに 飛びます。 ここで 当たつ 
ていた 場合の 処理 をす るんで すね。 
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atarim ( ) 


410 

atari f ( ) 


450 

atari f { ) 


920 

func atarimt ) :/* 自機 当たり 判 定 */ 


930 

if sp_chk( 33 , 38 , 51 ) <>0 then { 


1010 

locate 12,8 


1020 

pr int" game over " 


1030 

bg_set(0，0,0) 


1040 

stop 


1050 

} 


1080 

endf unc 


1090 

func atarif ( ):/* タマ 当たり 判定 */ 


1100 

for i=0 to 2 


1110 

j=sp_chk ( 34+i ,38,40) 


1120 

if j<>0 then daf ire{ ) 


1160 

next 


1170 

endf unc 


1180 

f unc daf i re ( ) 


1190 

f ire— x ( i ) =0 : f ire_y ( i ) =0 


1200 

sp— set ( 34+i , fi^e_x( i ) , f ire_y( i ) , 

&H120 ) 

1210 

sp— set ( j ， enemy— x(j - 38 ) , enemy— y< j 

-38) ，& H124 ) 

1220 

enemy_x { j-38 ) =0 : enemyy ( j-38 ) =0 


1230 

endfunc 



ところで， シュ一 ティング ゲームで 敵に タマ 
が 当たった ときには どうなります？ うん うん， 
敵が 消える。 それから スコアが 増える。 戈， パ 
ヮー アップ アイテムが 出たり， 敵が 膨れち やつ 
たり， 挙げ句の果てが 花火が 打ち 上がったりす 
る？ うん， まあ， そういうの もあります けど 
ね …… 。 

まず 最初に， 自分の タマと 敵が 当たった わけ 
ですから， とりあえず 自分の 擎 つた タマ を 消し 

ます。 これ は タマの x， y 座標に （0, 0) を 入れ 
て おけば タ マの 表示 部分が 勝手に 消 して くれ ま 
すね （一応 ， 念のために いってお くけ ど， スプラ 
イトって ちょつ と 座標が 変わって いて， （0,0) 
におく とス プライ トは 消えて くれます。 知って 
ますよ ね？）。 で， 当たった よ， というの がわ か 
るよう に 爆発 パターン を 表示して， 敵の 座標 も 
(0, 0) にします （1210, 1220 行) 0 こうすれば 敵 
の 表示 も あとで 消して くれる し， その 間 爆発 も 
残って くれる しで 一石二鳥な わけです。 とりあ 
えず， これ だけ。 r スコアが 出な いのは ともかく， 
敵に 当たった ときの 効果音 もな いのは とんでも 
ない 手抜き じ やない かつ！ j といわれても 「そ 
一です， 手抜き なんです j と 答える しかない よ 
うなぐ らいに 何もして ません 力 《， そ 二 は 皆さん， 
これ を 踏み台に して 頑張って 本ゼビ な り ギャラ 
ッパ なりに していた だきたい のでした。 


あつ， 上がった。 た 一ま"^ 一！ 


でもって， 自 機の 当たり 判定 ルーチン atarim 
( ) です。 こっち はさら に 手抜きです。 なんて 
たって 自桷の ストック （自分の 命 は 3 つまでと 
いう ィ ン ベー ダ一 からの 伝統の あれね） と かと い 
う 制度 もな く. 当たったら いきなり 死んで しま 
つて ゲーム オーバ一 なんです から。 爆発 パター 
ン さえありません。 世の中 なんて 二ん な ものよ。 
うむう む。 やって いる こと は， 自槻が 当たって 
いたら ゲームオーバーの 表示 を 出して BG を 消 
して， そのまま ストップ。 二れ だけです。 例に 
よって 皆さんで どう にかして いただく のでした 
(し 力、 し， I / 4 ページで 終わりそう とかいつ 
といて 今月 も 結構 害いた な あ …… ）。 

…… ああ， 苦關 6 力 月。 ついにす ベての 作業 
が 終わり， ゼビ モド キが 完成し ました。 ふ 一つ。 
しかし なんです ね。 終わった から 二ん な こと 力 < 
いえる のか もしれ ない けど， やっぱり もうち 
よつ と いろいろな 槻能 をつ けたかったです ね。 
やっぱり 自機は 3 機 …… いや， 個人的な 好みと 
して は ダメージ 制に したかった し， それに はや 
つばり スコア も 欲しかった し， あと， 背景 をス 
クロール させたり と 力、， BG か グラフィックに 
絵で も 描いて ボス キャラ を 作ったり とか （動か 
すの は スクロールで できる から 簡単 だしね)， 
音楽 は 無理と しても せめて 効果音ぐ らい は 入れ 
たかった な あ。 うむむ む。 まあ， そのうち 気が 
向いたら， また ゼビ モド キ 2 にバ一 ジョン アツ 
プ したい …… 。 

という ことで， これにて， 
第 1 部 未完 
なのであった。 それで はまた 来月 Oh!X で。 あ 
ちょつ ！ （と 瓦 を 割って 去る） 
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基本 イン 夕 フェイス 回路 その ョ 


Misawa Kazuhiko 

三 沢 和彦 


インタフェイス 回路の 製作 はう まくで きました か。 今回 はソフ 
卜 編で， 作つ た 回路 を 制御す る プログラム を 書いて みま しょう。 
まず 基本と なる ドライバ を 作り， その上で 走る 応用 プログラム 
を 書く というの は どんな 機器 を 使う 場合で も 同じです。 


今回 は 自作 I/O 基板 を X68000 か ら 制御す 
る 方法 を考 えましょう。 ま ず 代表的な パラ 
レル インタ フェイ スてぁ る ジョイ ス ティ ッ 
クポ一 ト を 制御す る ための 一般的な 説明 か 
ら 始まって， 実際に X-BASIC で ジョイ ス 
ティ ック ポートに つないだ I/O 基板 をコン 
ト ロールす るた めの 外部 関数 を アセンブラ 
で 記述して みます。 そして， その外 部 関数 
を 使った 応用 プログラム を 例に と り ながら， 
X68000 で 外部 機器 を 制御す る こ とへの 入 
門と なる よう 解説 していこうと 思います。 


データの やりとり 


外部 I/O 機器 は 複数の 装置が つ な げ る よ 

うに， 各々 に アドレス を 設定して 区別し ま 
す。 ある 特定の 装置に アクセスす るに は そ 

の I/O ァ ドレス を 指定して データ を 読み 書 
きします。 X68000 の 場合 は メインメモリ と 
I/O の アドレス 空間 は 共通な ので， マシン 



語で 記述す ると き は I/O ァ クセス でも 普通 
の メモリ アクセス と 同じです。 やりとりす 
る データ は 8 ビッ トの 論理 データです。 す 
なわち， 外部 I/O につな がって いる 各ビッ 
トの データ 線が それぞれ H か L か を と り， 
それら を 8 本 ま と めて CPU が 処理す る と 
い うわけ です。 

ただし X68000 の 場合 は， メ モ リ 空間 全体 
が ユーザー 領域 と スーパー バイ ザ 領域の ど 

ちらかに 分かれて いて， 通常 は スーパー バ 
ィザ 領域に は アクセスで きないよ うにな つ 
ています。 これ は， OS など を スーパー パイ 
ザ 領域 に 置いて， プログラムの バグな どに 
よって コンピュータの システム 全体 を 破壊 
しないよ うにす るた めです。 I/O 空間に も 
スーパー バイ ザ 領域に 割 り 当てられ ている 

ものが あり， そこに アクセスす るに は 工夫 
が 必要です。 今回の メイ ン となって いる ジ 
ョィ スティック ポート も スーパーバイザ 領 
域に あ ります。 


コ ラム 1 外部 関数へ ッ タ^ 3 の 解説 


X-BASIC の 外部 関数の 作り 方 は 1987 年 8 月 号 
に ^野 氏に よる 詳しい 解説が あります 力 S こ 
こで もう一 度 ソース リ ス ト に 沿って 復習して み 
たいと 思います。 

最初の 6 行 は アセンブラ ソース を 害く ときの 
おまじないの ような ものです。 別の アセンブラ 
ソース を 挿入す る ための include 文， BASTOC の ラ 
ィ ブラ リ と して 使う サブルーチン 名 を 指定す る 
globl 文， ソース を テキスト ベースに 指定す る 
text 文， そして 実際に 機械語 コードに 置き 換わ 
る 領域の 始めに メモ リ 境界 を 偶数に する even 文 
からな つてい ます。 

次に 外部 関数のへ ッ ダ部を 順番に 説明 してい 
きましょう。 初めに， インフォメーション テー 
ブルです が， ここに は， II 個の アドレスが 並ん 
でい ま す。 最初から 8 個 は 特別な 処理 を 行う 関数 
のために 設定す る ルーチンの ァ ドレス を 指して 
いるもので すが， 通常 は 使用し ないた め， rts の 
みの ダミ一 ル一 チンに なって います。 

9 番目 は 関数の 名前 を 定義した テーブルの 先 
頭 アドレス （ptr— token) を 指して います。 今回の 
I/O ドラ イノ、' は. データ 入力 を ioinp, 出力 を ioout 
にして います。 ptr token で 始まる 関数 名 テープ 


ル にこの 2 つが 並んで いるの がわ かるで しょ う。 
1 0 番目 は閱 数名 テ一 ブルで 定義した それぞれ 
の 関数の 引数お よび 戻 り 値の 型と 順番と を 定義 
する テーブルの 先頭 ァ ドレス を 指して います。 
すなわち， この アドレス （ptr— param) の 先 を 見る 
と ， ioinp_par と ioou し par の 2 つの ァ ドレス が 並 
ん でいて， それぞれが 以後の パラメータ ID テー 
ブルの ァ ドレス を 指して いる 二と になり ます。 
そして， パラメ一 タ ID テ一 ブルに それぞれの 関 
数の 引数と 戻り 値が 実際に 定義され ている わけ 
です。 二れ より， ioinp は 引数がなくて， ポート 
から 入力した データに 当たる 整数 型の 戻 り 値 を 
持ち. ioout は ポートへの 出力 データに 当たる 整 
数の 引数が I 個で 戻り 値 はない 二と がわ か り ま 
す。 

I I 番目 は それぞれの 関数の 実行 ルーチンの ァ 
ドレス を 並べた テ一 ブルの 先頭 ァ ドレス を 指し 
ています。 こ の ptr 一 exec の 先に ある ioinp— exec と 
ioou し exec とが 実行 ル一 チンの 先頭です。 

以上で ヘッダ 部 は 終わりです。 駆け足での 復 
習でした が， 自分で 外部 関数 を 定義す る 必要が 
なければ， この 部分 は あまり 理解し なくても よ 
いと 思います。 



この あたり の 予備知識 を 頭に 入れて おい 
たうえで， 外部 関数の ソース リスト （リス 
ト 1) を 一緒に 見て いき ましょう。 


1/。 制御 用 外部 関数 


外部 関数の アセンブラ ソースに は 大き く 
分けて ヘッダ 部と 定義 ルーチン 本体と が あ 

ります。 ヘッダ 部 は 今回の 本題から 外れる 
ので， 簡単な 解説 を コラム 1 に 譲る ことに 

し， さっそく ドライバ 本体 部分の 説明に 移 

ります。 

外部 関数 は ポー ト からの データ 入力が 
ioinp 関数， 出力が iooutfMi 数と して 定義 さ 
れ ています。 ioinp は 引数な しで， 戻り 値 は 
入力 データに なって いて， ioout は 引数に 出 
力 データ をと り， 戻り 値はありません。 

ioinp 関数が 行って いるの は， ジョイ ステ 
イツ ク ポートの アドレス をす 旨定 して， そこ 
から 8 ビッ ト データ を 読み込む だけの こ と 
です。 ソースに 沿って 見て いきます と， ま 
ず ジョイ ス ティ ック ポートの 入力の ァ ドレ 
ス ぱ E9A001) を porta という シンボルに 割 
り 当てて います。 次の ioinp—exec か ら メイ 
ン ルーチンが スタートで すが， ここでい き 
な り サブルーチン— ioinp に 飛んで い ま す。 
こ れ は， X-BASIC の 外部 関数 と BASTOC 
の ライブラリ と を 1 つの ソース フ アイ ルで 
兼用させる ため の 工夫な のです 力 ? ， 詳 し く 
は コラム 2 を 参照して く ださい。 

さて， メイン ルーチンの— ioinp に 入る と， 
まず 先 ほど 説明した ように， スーパ一 バイ 
ザ 領域に ある ジョイ ス ティ ックポ 一卜に ァ 
クセス する ため に DOS ファンクション コ 
ール の— SUPER によって， スーパーバイザ 
領域に も アクセス でき る モードに 入り ます。 

そして， あらかじめ ク リアして おいた D 
1 レジスタに I/O 基板 か ら 入力して きた 
porta の データ を 転送し ます。 目的が 達成 さ 
れ たら 再び， 元の ユーザー モードに 戻して 
から， D1 レジスタ 内の データ を 外部 関数 か 
らの 戻り 値 を 格納す る バッファに 入れます。 
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戻り 値 バッファ は プログラムの 最後に ret 
dat で定 された 10 バイ ト の 領域に な つ て 
います。 今回の 関数で は 戻り 値 は 整数 型な 
ので， ポートから 入力し たデー タ は 最後の 
4 バイ 卜に 当てはめます。 実際 有効な の は 
最下位 1 バイ ト なのです が， 一応 こ こで は 
4 パイ ト整 数と して 扱って います。 

ところで， 外部 関数の 戻 り 値の 受け 波 し 
方です が' AO レジスタに 戻り 値バ ッファ の 
先頭 ァ ド レ ス を 入れて rts で リターンして 
やる だけで OK です。 この プログラム では 
いったん —ioinp ノレ 一 チン か ら ioinD —exec ノレ 
一 チンに 戻って きてから， 改めて 外部 関数 
処理 か ら 出 る rts 命令が きています。 な お， 
外部 関数 を 正常に 終わる と き は DO レジス 
タに 0 を 入れてから リ ターンす る 必要が あ 
り ます。 

ioout 関数に ついては， 引数が あるので 注 
意が 必要です。 引数で ある 4 バイ ト 整数 (実 
際 ここで も， 有効な の は 最下位 1 バイトの 
み） をまず ジョイスティック ポートの 出力 
のァ ドレ ス ($E9A001) を portc という シン 
ボルに 割り当て ています。 整数 型の 引数 は 
スタックの 先頭から 13 バイ ト 目から 糗 まれ 
ている ので， そこから 読み出して ポートに 
転送す る わけです 力 ; ， ここで は X-BASIC 
の 外部 関数 と BASTOC の ライブラリ と を 

1 つの ソース フ アイ ルで 兼用 させる ために 
いったん 引数 を スタック 上で 積み替えて， 

ioout ルーチンに 飛んで い ま す。 
_ioout ルーチンに 入ったら， まず スー ノ、 0 
一 バイ ザ モードに 切り替え， スタック にあ 

る 出 力 デー タを D2 レジスタに 移してから 
その データ を ボートに 出力し ます。 そして， 
再び ユーザー モードに 切り替えて 終わり ま 

す。 ioout 関数 は 戻!)' 値がない ので， 終わ り 
方 は 簡単です。 

それで は， アセンブラの ソース を エディ 
タで 入力した のち， iodrv.s の ファイル 名で 
セーブして ください。 あと は， 
cc iodrv.s 

て lodrv.o と lodrv.x を 生成し， この lodrv.x 
を BASIC2 の ディ レクト リ の 中に iodrv.fnc 
の ファイル 名で コピーし ます。 もちろん 
BASIC.CNF ファイルの 中に 

FUNC = IODRV 
と 加える こ と も 忘れずに。 

サンプル プログラム 

こ れで， 外部 関数が X-BASIC の な かで 
使える ようになりました。 まず 簡単な サン 
プル を リスト 2 に 挙げます。 これ は 16 進 口 
ータ リース ィ ツチの 入力 を その ま ま 7 セグ 


メント LED に 出力す る プログラムです。 も 
ち ろん X68000 自体が データの 読み書き を 
している わけです から， データ は BASIC 上 
の 変数に 取り込まれ ていて， それが その ま 
ま 画面 上に 表示され ます。 なお， 7 セグメ 
ン ト LED の 出 力 は 3 ビ ッ ト なので， （） ~ 7 
しか 表示され ません。 

この プログラムの 中 に inpval と outval の 
2 つの 定^ |-»] 数が あ り ま す 力；'， こ れ につい 
て 少 し 説明 します。 そ ら そ も， X68000 と 1/ 
O 基板との データの やり と り は， 数値 デー 
タ ではな く て 論理 データです。 

たとえば 入力 データ は， ロータ リース ィ 
ッ チ から 人力し た 数値 （ 0 ~15) を 2 進数 
で 表 し， 下の 桁から 1 が 立つ ビ ッ ト がし 
0 が 立つ ビ ッ ト が H に 対応 しています。 い 
ま 入力 データが 9 とすると 2 進数で 1001,, 
ですから， 入力 ポートから 読み込む 論理 デ 
ータは LHHL とな り ます。 通常 は H のビッ 
卜が 1 , L の ビ ッ ト が 0 に 形式的に 対応 し 
ますので， ioinp 関数で 読み込む 値 は 6 (= 
0110b) という ことになります。 inpval 関数 
はこの ように 各 ビット の 論现が 反転 してい 
る デー タを 正し い 値に 直す た めの 関数です。 

次に 出力 データ は パラ レ ルイ ンタ フェイ 
スの 8 ビッ ト デー タ のうち， ビット No. 4 , 
6, 7 の 3 ビット を 使って いるので す 力 f , 



こ れを 今回の I/O 基板で は 3 ビ ッ 卜の 2 進 
数デー タ として， 上の 桁 か ら ビ ッ ト No. 4 , 
7, 6 の 順に 変則 的に 並べ て 使って います。 
しかも ビ ッ ト No. 4 は データと して 1 を ,屮, 
力す ると ポートに H, 0 を ,屮, 力す ると L が 
きちんと 出 ま す が, ビ ッ ト No. 6 と 7 は 1 
を 出力す る と L, () を, 1 1 1 , 力す る と H が 出て， 
ビッ ト No.4 と 出力が 反お している のです。 
したがって， た と えば 5 を 出力 したいと き 
は， 101 B ですから 下 2 桁 は 反転して HHL と 
し， しかも ビッ 卜 を 人れ^ えて， HLXHX 
XXX (X は 関係ない ビッ ト） の 論理 データ 
を 出力し なければ な り ません。 
outval|»| 数 は 引数 として 0 ~ 7 を 取り， 


コラム 2 外部 関数と ライブラリの 兼用 


X-BASIC の 外部 関数と BASTOC の ライ ブラ リ 
と を I つの ソースファイルで 兼用させる ための 
工夫に ついて 説明す る 前に， コンパイル したと 
きに 外部 関数が どう 扱われる か 説明して おき ま 
しょう。 

外部 関数の 処理の 部分 は 外部 関数 名の 前に そ 
のま ま た' 'をつ けた ラベルの サブルーチン を 呼び 
出します c したがって， コンパイル された マシ 
ン語 プログラム は その ラベルの サ ブル一 チン を 
ライブラリと して 持つ 必要が あ リ ま す。 

たとえば 今回の 場合， BASIC プログラム 中で 
ioinp 関数 を 呼び出す 箇所 は， 
bsr —ioinp 

という 命令に 書き 換わります。 そして， 引数 は 
外部 関数に おける 力 ッ コの 中の 順番の と お リ に 
スタックに 穆 まれます。 それに 対して 戻り 値 は 
D0 レジスタに 格納され て サブルーチンから 戻 
つてき ます。 

これ だけの 予備知識 を 頭に 入れて， もう 一度 
ソース を 見て ください。 ioinp 関数と ioout 関数の 
定義 ル一 チンの 中に それぞれの 関数 名に— をつ 
けた Joinp と Joout と いう サブルーチンが ある 
のが わかる でしよう。 この ソ一ス を ライブラリ 
として fig つた 場合， この サブルーチンが 参照 さ 
れ るので す。 ですから この サブルーチン におけ 
る 引数， 戻り 値の 処理 は 上で 述べた と お り に な 
つてい ます。 

たとえば， Joinp の 戻り f 直に ついては， 一 ioinp 
ルーチンの 最後で， 入力 ポートから 読み込んで 


きて DI レジスタ に 格納 し たデ一 タを D0 レジス 
タに 移してから リターンし ています。 また， ― 
ioout の 引数 もスタ ック のい ちばん 上に 積んで 
ある （実際 は， 引数 を スタックの いちばん 上に 
積んだ あと， サブルーチン コール をして， その 
リターン アドレスが さらに スタックに 孭 まれる 
ので， 上 か ら 2 つ 目 の 整数 デ一 タが 引数に なって 
いる） データ を D2 レジスタに 取り出して， 出力 
しています。 

さて， X-BAS にの 外部 関数の 引数と 戻り 値に 
関して は ライ ブラ リのサ ブル一 チン コールと 形 
式が 異なる ので， 外部 関数 を 呼び出す とき は， 
その 部分 を 変換して やる のです。 具体的に ioout 
関数の 引数に ついては， スタックの 13 バイト 目 
に 積まれて いる デ一 夕 をもう一 度 スタック のい 
ちばん 上に 積み直して ライ ブラ リのサ ブル一 チ 
ン コールと 見かけ上 同じ 形式に してから， 共通 
の Joo は ルーチン を 呼び出す のです。 

二のと き， 最後に 外部 関数から 出る ときの リ 
タ一 ンァ ドレスが 積み直した データに よって ス 
タックの 中に 埋もれて しまい， このまま では 正 
常に 終了 しないので， スタックポインタ を 操作 
してから 終了して います。 また， ioinp 関数の 戻 
り 値に ついては， 戻 り 值ノ、 'ッ フ ァ に 格納 してや 
れぱょ いので 特別な 操作 は 必要 あ り ません が， 
外部 関数 を 正常に 終わる と き は D0 レジスタ は 0 
でな く て はならない ので, Joinp ルーチン 内で 戻 
り 値 を 格納した D0 レジスタ を 改めて 消去して 
おかなければ なり ません。 
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7 セグメ ン ト LED が 正しい 値 を 表示す る 
よ う に データ を 変換した あ とに ポート に 出 
力す る ものです。 

皆さんが もし 自 分で 応用 プ ログ ラム を 組 
むと き は， こ の inpval 関数， outval 関数 を そ 
のま ま 引用す ると 便利でしょう。 なお， こ 
の プログラム を コンパイル する と き は， 

CC IOTEST.BAS I0DRV.0 

を 実行して ください。 以後， すべての プロ 
グラムに ついて， コンノ ゝ° ィ ノレの とき は 
I0DRV.0 を リ ンク すれば OK です。 


応用 プログラム 

先に 述べた， inpval 関数 と outval 関数 を 
使って さらに ゲーム を 組んで みました （ リ 
スト 3)。 内容 は 簡単 そのもの， 7 セ グメン 
ト LED の 数字が 回る ルーレットです。 口一 
タリー スィッチで スタート， ストップ を 行 
います 力 f , それだけ では あまりに も 色気が 
ない ので， ルーレットの 数字 当ても 加えて 
みました。 この あたりの ゲーム デザイン は 


皆さんの ほうが 得意 かも しれません。 

わざわざ 自作の I/O 基板 を 使わな く て も 
X68000 単体で こ の 程度 の プログラム は 組 
める わけです 力-:， やはり， 自作の 基板 をパ 
ソコン 本体から コン ト ロールす る 面白さ も 
ま た 格別です。 このよう な 基本的な 回路に 
ついて しっかり 押さえて おく こと 力?， より 
高度な 回路 を 使いこな してい く ために は大 
切なので す。 次回 はもつ と 歯応えの ある （し 
かも 実用的な） 回路 を 扱います ので， 楽し 
みに していて ください。 



リス 卜 1 I/O 制御 用 外部 関数 iodrv.s 


C 本 ネ :f ネ * * ネ ：(: 本 # t 本本; ( 


本本 事 **** 
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外部 間数 

ioinp tt ioout 



75 
76 

* パラメータ 

I D 

テーブル 




1990. 6.17 K. Misawa 



77 

ioinp_par ： 



int_ret 






78 

ioout— par ： 



int— va 丄 



： データ 人力 



79 



o 

void ret 



(引数） なし 



80 







(戻り 値） データ 



81 






ioout { d&ta 

) ： データ 出力 



82 

* 実行 アド レ 

ス テ 

—プル 




(引数） データ 



83 







(戻り 値 > なし 



84 

ptr exec ： 


del 

ioinp_exec 






85 




i oout— exec 


X - B A S I 

C 外部 関数 



86 






& B A 

S T O C ライブラリ 兼用 



87 



. even 







88 






«聿« 本本 本本 本： c 本 ま » 本 傘 拿 « 本 本本， 


I： 拿; 拿 拿: t 拿 « 本 傘 拿 « 4 


ioout— par 


定義 M 数. 


* デ一タ 人力 M 数 ioinp( ) 

porta equ $e9a00 1 


*** 実行 アド レ 

ioinp_exec ： 


ioinp 
#0 ,d0 


け * メイン ルーチン 
ioinp ： 


ス一， 


rd 一 ok: 
*** ジ ョ 


ィ ザモ一 ドに 入る 

clr. 1 - ( sp) 
dew 一 SUPER 
adaq . 1 #4 , sp 
move . 1 d0 , spbuf 


ヅク ポートから 読み だし 
move . 1 #porta,d2 
movea. 1 d2 , a3 
move . b ( a3 ) , d 1 


ドに 戻る 
move , 1 
dew 
addq . 1 


spbuf , 一 ( sp ) 
SUPER 


*** 戻 り tt を 

rd_ready ： 


プアに 格納 

move ,1 d 1 , int data 
\es^^ 1 Ee.td^tt ,■— a— 0 


* データ 出力 M お ioout(data) 
portc equ $e9a005 

*** 実行 ァ ドレス 

ioout exec : 

*** 引数 を スタックに 積み替え 


inc 丄 ude 

include 

globl 

globl 

text 


doscail . mac 
fdef ,h 


93 
94 


外部 M 数- 


ダ都 


インフォ メーシ 


—プル 


x_ini t 
x run 


x_ctrl_d 
x real 
x rea2 
ptr— token 
ptr_param 
ptr— exec 
0,0,0,0,0 


x_in.it : 
x— run : 
x end ： 
x_sya ： 
x_brk : 


x_resl : 
x res2 : 


*M ft 名 テーブル 
ptr token: 


dc.b 
dc.b 


' ioinp ' , 0 
' ioout_， , 0 


* パラメータ テープ 
ptr param: dc 


ioinp_par 


97 
98 
99 
100 
101 
102 
103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
1^3 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 


cccccccccccc 
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142: 
143： 


147: 
148: 
149： 
150： 
LSI: 
152: 
153： 
154: 
L55: 
L56: 
157 ： 
L58: 
159： 
160： 
161 ： 
162: 


move . 1 1 2 ( sp) , dl 
move . 1 dl, - (sp) 

bsr — ioout 
addq - 1 #4,sp 


* * * メ ィ ン ルー' 
ioout ： 


*** スーパ 


: ィ ザ モー ドに 
clr.l 
dew 
addq . 1 
move . 1 


"* ジ 3 ィ 
wr_ok ： 


ス テ 


V フポ— 

move . 1 
movea . . 
move . 1 


人 る 
-(sp) 
一 SUPER 
#4,sp 
d0, apbuf 

卜へ 書き込み 

#portc,d2 
d2,a3 
4(sp) ,dl 


move . b dl , { a3 ) 


—ザ 一 


* スタ' 
Bpbuf 


ク バ 


* 戻り « 格納. 

retdat ： 
int— data ： 


ドに 戻る 
move . 丄 


del 


apDui , - ( sp ) 
SUPER 


addq. 1 #4, 


フ ァ 
ds.l 


I リス 卜 £ サン ブル プログラム iatest.bas | 


I リス 卜 3 応用 プログラム roulette.bas 


save "¥basic¥roulette. bets 
save8"¥baa ic¥roulette . doc 


基板 用 応用 ブ ログ' 


'ソ ト ゲ一. 


m ini t i ) 
m_alloc( 1 , 100) 
m_ass ign( 1,1) 
m_tempo( 120 ) 


/* 初期 チェック 
/» 

while inpval { J <>0 
looate 13, 14 

print "ロータ リ一 スィ ヅチを 0 にし 
for iii=l to 2000 : next 
els 
endwhile 

/* 予想の 入力 


repeat 

locate 10, 14 

input ' '予想す るお を 入力して 下さい'' ； j 
until j>=0 and j < = 7 


ルーレ ヅ ト 
(口一 タリー 


locate 10,14 
print " 口一' 
repeat 


を 動: 


と 停止） 


を 面すと ルーレ 


まり ま 


else ( lose ( ] 


and 4B1 111 ) 


outval ( l ) 

for iii=0 to 200 
until inpval { ) <>0 
/* 

結果 判定 

/* 

els 

locate \Q, 14 

if i= j then 1 win ( ) 

m_play { ) 

end 

/* 

/* データ 入力 
/* 

func int inpval { ) 
int v 

v=&Bllll-{ioinp() 

return { v ) 
endf unc 
/拿 

パ データ 出力 
/* 

func outval (d0 ； int ) 


680 vl=l-(d0 and &B10>/&B10 
690 v2=(d0 and &B100)/&B100 

700 v=&B10000000*vl+&B1000000»v0+&B10000»v2 
710 ioout (v) 
720 さ ndfunc 
730 /* 

740 /* 結果の 処 a 
750 /* 

760 func win( ) 

770 print "大当たり ！" 

_trk( 1 , "«57vl5o5 f8e8d8c8f8e8d8c8f4a4g4r4" 


m 一 t 
endf u 


func loae { ) 

print "残念でした" 

m_trk( 1 , "«34vl5o3 f 4c8c8d4c4r4e4 f 4r4 " 
endfunc 


10 

/* save ¥basic¥ioteat . baa 

20 

/* 



30 
40 

/*IZO 基板 用 サン 

プル プロ 

50 
60 

/* 1990.7 
パ 

. 1 K. 

Miaawa 

70 
80 

int v 
while 1 



90 

v=inpval ( ) 



100 

outval (v) 



110 

print v 



120 

endwhile 



130 

end 



140 

パ 



150 

/* データ 入力 



160 

/* (引 tt ) な 

レ 


170 

/* (戻り 值） 

口一 タ 

リス イツ 

1B0 


0-1 

5 

190 

/* 



200 

func int inpval ( ) 



の « 


210 int v 

220 v=&Bllll - （ ioinp(> and &Bim) 

230 return(v) 

240 endfunc 

250 /* 


8 で 割った 余り を 
に 表示 
310 /拿 

320 func outval {d0; int) 

330 int v, v0,vl , v2 

340 v0=l-(d0 and 1) 

350 vl=l-(d0 and &B10)/&B10 

360 v2=(d0 and 4B100>/&B100 

370 v=&B10000000»vl+&B 1000000* V0+&B 10000 本 v2 
380 ioout(v) 
390 endfunc 


爐しを D 

数な 数 E 

力 整- '引 L 

出 >值> 

タ j» り Ms 

/ / / / / 

0 0 0 0 

6 7 8 9 0 

2 2 2 2 3 
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第 41 回 知能 


r 冊 — あ 茶目な it 算機 たち 


超能力 実験の 成: 


木 


/M「. マリック (3 里 もれた 纖カ J 

新 宗教， オカルト， 超 能 力 ， 占い な ど が, 
世紀末の い ま に ふさ わ し く ， 流行って い る 
ようです。 神秘的な もの 力 5 ， 人々 を， 特に 
若者 を 熱中 させる という 社会現象， 文化 现 
象に 注目し， それ を 解析す る こと はき わめ 
て 面白い こと だと 思います。 最近 読ん だ 別 
冊 宝 ft (文献 1 ) は そのよう な 現象 を 取 り 
扱った 本です。 新 |«， テレビな どを脤 わせ 
ている ^教な ど を 豊富で かつ 具体的に レ ポ 
ート してお り， しかも， いろいろな 方面 か 
ら の 分析 は あっとい う 間 に 読み終 えてし ま 
う ほど 興味 を ひく ものです。 

新 宗教， オカルト， 占いな ど は あまりに 
もお どろお どろし いので， ここで は 超能力 
を 取 り 上げ ま す。 知能 機械 概論 という タイ 
トルに も， まあ ふさわしい といえる でしよ 
う。 とにかく 気をつける こと は， 真面目に 
かつ 知的に， つま り 科学的な 態度 を 持ち 絞 
ける ことでしょう。 

人工知能， あ る いは lit 算機 と 超能力 に t ' 
つたい どん な 関係が あ るんだ， と 真面目に 
質問され ると ちょっと 苦しい こと も ありま 
す 力-:, まずこう 答える でしよう。 「人工知能 
は 入 に 的に 作 り 出 さ れた 入 間の 知能 を 呼ぶ 
もの だ。 その 入 問の 知能に 含まれる （かも 
しれない） 超 能 力 も 当 然 科学的 に 見極めて 
対象と すべき だ」。 

ま た， 超能力 を はじめと する 神秘的な も 
のに 向か う 若者の 心と， 計算機に おか う 若 
者の 心 に 間接的 な 関係で は あ る 力 5 , 案外 大 
き な 共通点が あるので はない 力'， という 印 
象 を 僕が 持って いる こ と も 両者 を 関連 づけ 
よ う とする ひとつの iWt になって いるか も 
しれません。 

で も '與 際の ところ， なぜ 超能力の こ と を 
取 り 上げた か というと， 敁近， 超能力 に つ 
いて 学問的 じ 取り上げた (そ して 科学 史の 
分野で は きわめて 有名 な 村 上 陽 一郎 氏の 訳 
し た） 1 III! "の 野心 的な 本 を 読んだ という こ 
と （これが きわめて センセーショナル つぼ 
いの だが）， それに 一見 超能力つ ぼい という 
« 象 を ほおし た か ら なのです。 

[ ^思想家の 書いた 1 冊の 本 1 

超能力 を 扱つ た 本と いうと， ス ブー ン llll 
げ と 力'， Mr. マリックと かい うよう な 類の 
•'If 象 や 入 を 扱った， 半分お 遊びの ような 本 


を 連想して しまいます。 しかし， そうで は 
ない まれな 1 冊の 本 （文献 2) が なぜか 自 
分の 家の 本棚に 存在して いま した。 

著者の ケス トラー はもと もと は 新聞記者 
でした が， 政治 活動 を 行い, 刑務所に 入れ 
られた 後， 科学思想 に関する 著作 を 発表し 
始め ま した。 有名な ものに は， 「ホロ ン 革命」 
「機械の 中の 幽霊」 「還元 主義 を 越えて」 な 
どが あります。 ホ ロンに 基づく 階層 構造な 
どの 話 はかな り IJ 本で も 話題 を 集め ま し た。 

彼の 科学思想の 特徴 は 次の 点に ある よ う 
です （文献 3)。 

1) Jid 実生活から 科学 を 遊離 させず， 抽象的 
な 理論に 走らない。 

2) 正統 的な 思想に 反逆す る （反ダ 一 ウイ 二 
ズム， 超 心理学への 注目）。 

3) 専門家で は 言いに くいこと でも ズ バズ 

■'^s フ 0 

本書 はた だ 単に 起 能力が 存在す ると 主張 
している のではありません。 超能力 を 現代 
物现 学， 心理学， 生物 '-7: などの 最先端の 成 
果と 関連 づけよ う と している のです。 ただ 
し， ケス トラ一 白身 は 科学者で は ない ので, 
g 分で な に か 实験を 行った り ， 論証 し た り 
す る ので は な く ， 第三者 的な ジャー ナ リス 
ト に 近い スタンス を とっています。 

本書で は， まず， テレパシー， 予知， 念 
動な どのよう な 現象 は 確' 失: に 存在す る もの 
であると いう こと を， さまざま な 研究者た 
ちの 発表 を 具体的に 提示す る ことで， 我々 
を 説得し ようと 試みます。 そして， 次に は， 
がら り と 話 11 が 違う よ う に 思われる， 現代 
量子力学 における， 入 |!!] の 想像 を 越える 奇 
妙な 素粒子た ちの 姿に ついて 述べます。 読 
者 はし だいに， も しかしたら 最初に 述べた 
超能力 を このよう な 物 K の ミクロ な 姿で 説 
明 をし よ う と している のだろう かと 感じ 始 
める でしよ う。 

次に ケス ト ラー は 超能力 を 完全に 説 W す 
るまでに は 至らない ものの， いくつかの 手 
掛か り を 提示 します。 そ れは 現在の 学問 体 
系の 大きな 基盤で ある 「W 果 |鲥 係」 の 絶対 
的 存在 を 否定す る ものと しての 「連続 性 j 

「同期 性 （シンク 口 二 シティ）」 の 概念で 
す。 これら は 生物学， 物理学， 心理学の そ 
れぞれ の 巨匠で ある カメラ 一， パウリ， ュ 
ングら によって 考え出され てい る 概念です。 
そして， 本書 ははつ き り した 結論 を 提示 
する に は 至らな いまでも 多く の 示唆 を 残し 


て 終わ り ま す。 ここで は， 本書 全体の 主張 
まで は 踏み込まず， 超能力の 存在に 閲 する 
データ を 突きつ ける 第 1 章 だけにつ いて も 
う 少し 紹介す る ことにします。 

じざる を 得なくなる 第 1 章 j 

超能力の 学問的 研究の 先駆者 はァメ リ 力 
の デューク 大学 心理^ f4 の ライ ン 助教授 だ 
そうです。 彼 は 1932 年に 超 心理学 研究所 を 
設立し， それまで は 怪しげな ところの 多 か 
つ た こ の 手の 現象に 対 して 厳密な 科学的 手 
法 を 導入 して 解析 しょうと しました。 

卜 ラ ンプ 当て や サイ コ 口振り の 実験 はな 
ん と 何千 入 という 無作為に 抽出 さ れた 入た 
ち を 使い， 何百 万 回と いう 実験 を 繰り返し 
た も の だ そ う です。 彼の 示 し た 超能力の 存 
在 を 証拠 づける 結果 は， いまでは 議論の 余 
地の ない 完全な ものである とされて いる と 
のこと です （ケ スト ラーの 解釈 だとい われ 
れば そのと おり かも しれません が）。 

彼の 実験 も 含めて 数多く の 結果が 第 1 章 
に は 記されて います 力 f ， ラインの 行った テ 
レ パシーに 関す る ひと つの 实験を 紹介す る 
ことにしましょう。 「ゼナ 一 カード」 と 呼ば 
れる， 円， -ili 方形， 十字， 星， 波と いう わ 
ず か 5 種類の カード を 用います。 その 1 枚 
を 送り手が 無作為に 選び， それ を 見て 受け 
乎に イメージ を 送り， 受け手 は それが 何で 
あるかと いう こと を 当てる のです。 当然， 
テレパシー など 存在 しないの ならば， それ 
が 当たる 確率 は 5 分の 1， つま り 100 回 行え 
ばだいたい 20 回 当た る はずです。 

1934 年に ライ ン によって 公開され た 記録 
は， 特定の （超能力 を 有して いると 考えら 
れる） 被験者に 関する， 8 万 5 千 回に も 及 
ぶ^ 験の すべての データでした。 これによ 
る と， 全体 を 通じて， 100 回に 対して 28 回 
という 割合で 当た り 続けた という こと です。 
こ れは 偶然 と 考える にして は 天文学的な 数 
字の ずれと い う こ とです。 

さらに いろいろな 入の 行った 荬 験の 結 采 
が 記されて います。 それら は イギリス 心 整 
研究 学会の 学会 誌に 論文 として 発表され て 
います。 こ の 学会 は 最初 はなん と な く 胡 散 
臭 く 思い ま し たが, 読んで い く うちにき わ 
めて 権威が あるので はない かと 感じ られて 
きました。 というの も， 数 ページ を さいて 
こ の 学会の 信頼性 を 高める よ う な 記述が あ 
つたから です。 
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Arita Takava 有 田 隆也 


この' 7： 会の 歴 ft の 会 (全部で 47 人） の 
屮 に は 3 入の ノ 一 ベル 't't'2-'ittl-, 1 人の 首 
相， 10 人の 王立 学会の メンバー, 多数の 大 
学 教授 （ケンブリッジ， ハーバード， ォッ 
クス フォード など） を^んで おり， 本書に 
は わざわざ 全員の リ ス ト も 載せられ てい ま 
す。 さら に 副 学会 長 や 巡 営 委員な ども 含め 
る と， ずいぶん 描 威の ある ものになる であ 
ろうと 述べて います （たとえば^ 子の 発見 
おの ト ム ソ ン ま で 含まれて い るとの ことで 
す）。 

I 卜 本の 現在の こ の 手の 研究が ほんの 少 し 
しか 行われて いないとの 認識 を 強めた の は 
次の 記述 を 読んだ と きです。 

「いまでは 世界中 どこ を 探しても， 超 心理 
学の 研究 学 を 有す る 大学の まったく な い 
よ う な 国 を 探す こ とがむ しろ 難しい」 

-姓 近で はさら に 厳密 を 極めた 実験が 行わ 
れ ている とのこと です。 それ は， 1 個の！： 
子が あ る 放射線 を 発 '-おす る 量子 過程 を 利用 
して， 4 つの ランプの うちのひとつ を 無 作 
為 点灯 さ せ， 被 験 若 は ど れ がつ 〈か を 当て 
ると いう ものです。 2 万 回 行って， 偶然な 
らば 10 の マイ ナス 10 乘の 確率と い うきわめ 
て 起こ り に く い 現象 を 確認した と いう こと 
です。 

「 超能力 実験の 行われた 日 ゾ 

さて やっと 僕の 身近で 確認で き た と 思 わ 
れる 超能力に ついて お^しす る と きがき ま 

し た。 実は こ の iJi 象 は 僕が 先 ほ ど の 木 を 読 
む 前に 偶然 起こつ た わけで， 厳密に 实験 と 
い う 性格， あるい はお 観 的な 説得力 を 持た 
せた もので はない という こ と は 最初に 言つ 
てお かなければ なりません。 し 力' し， 記録 
と して 残す だけの 価値 は ある と 僕 は 思った 
のです。 

テーマ は テレパシーです。 方法 は ひとり 
力 s 適当に 簡単な 絵 を 描き それ を 兄 ながら ィ 
メージ を 送り， もう ひとり は その イメージ 
を 頭の 中で 受け取り それ を 絵に 描く という 
ものです。 

そのと きの 状況 を 忠^に 追ってい く こ と 
にしましょう。 僕 自身 は 同じ 部屋で 別の 仕 
事 をして おり， 途中で 騒ぎが 大 きくな つ た 
ので 見物に 加わりました。 ですから， 加わ 
るまでの こと や 被 験 名-たちの 心 怙 な どに つ 
いて は あ とで 閗ぃ たこと からまと め まし た。 
： に：:::: 二に 超能力お 験 巾 継 開始:：： ニニ ニニ 



1) 暇 を 持て余し ていた Y, T, S の 3 入 

の 話! a は 偶然 超能力 に 移り， そ れ では 試 し 
に テレパシーの 実験で も しょ うかと いう こ 
と になる。 

2) Y は どっかで 兒 たような マーク （図 1) 
を 描いて 送る。 T は パッと イメージが 湧き 
それ を 描く （図 2)。 あまりの 類似に 驚き， 
も う 1 fnl やろ うとい うこと になる。 

3) Y は イカの 絵 （は 13) を 描き， T に 送 
る。 T は 四角形と 三角形の 絵が 頭に ;7 かび, 
おでんだ ろうと （余, 汁 に） 考えて， それ を 
描 く （図 4 )。 結果に 驚 く。 そのまま 三 ft と 
四角 を 描けば よかった という 話になる。 話 
は 盛 り 上が り 次 は 立方体 だろ うな どと いう 
話題が 間接的に 出 る （ こ れは 次の 実験の 正 
確 さ を 落とす ことになる， ただ し サイコロ 
と いう 言 菜 は も ち ろん 出て いない）。 

4) (典 味が 出て 加わった） S は T と Y にサ 
ィコロ の 絵 （閒 5 ) を 送る。 豆腐 だ と Y が 
言い出し （図 6 ), それ を 聞 いた T は 一部が 
尖った 豆腐の イメージ を 受け取る （図 7)。 
室内 はすで に 騒然と した 棼 ffl 気に 包まれて 
おり， 3 人と も かな り 冷静 さ を 失つ ている。 

5) 次に Y はまつ た く 抽象的 な ィメー ジ 
(図 8) を 送る が T は 現实 的な もの をィメ 

ージ しょうとして， フロッピーディスクの 
絵 （図 9) を 受け取って しまう。 ^たらな 
かった という ことになる 力-:, Y は （ちょつ 
と 強引 だが） フロッ ピーの 巾 心の 円 とその 
下の 窓の 部分 そのもの だと， 解釈 しょうと 
する。 

6) そ の 後， 2 回^. 験 を 行 う が あ ま り 似て 
いない （その後 実物の 絵 は 捨てて しまう）。 
もうこれ 以上 やつても， せっかく のこの 驚 
き を 打ち消す だけの 結果に な り そ う な 気が 
してやめ る。 

ニニに ニニ： 超能力 灾験 中継 終了:：：：：：：：：：：： 


こ の 灾験か ら す ぐ に 結論 を,' 1', そうとして 
いるので は， もちろんありません。 読んだ 
力 • が ひとつの データ と してで も 受け取って 
も らぇ ぱいい のでし よ う。 突 験 結果 は 決め 
られた 記号 や 数字な ど を 送る ときの ように， 
^た り はずれの 成 緒が iH 確な 数字で 表され 
るよう な も ので は あ り ません から， 「こん な 
こと 力 5 もし 偶然 起 きる としたら そ れは， こ 
ん なに 小さな 数なん だ」 という こと もで き 
ません。 し 力' し， 自 fll に 描け る 絵 だから こ 
そ， これほど 一致す るの は 驚異的 な の だ と 
いえる よう な 気 も します。 

4 li'l の 実験に ついて， 一^ それぞれの 成 
果を 主観的に 100 点 満点で 評価 してみ まし 
よう 力'。 まず 1 W 目 はなん と いって も 95 点。 
2 回目 は 75 点。 3 回目 は パターン として は 
90 点 だが, 場の 雰囲気が 情報 を かな り 伝え 
てし まつ たので マ ィ 十 ス 50 で 4() 点。 そして 
4 回目 はま あ 20 点で しょ う。 

[ お茶 目な 脱線 J 

た ま たま 超能力の^ り のす る说 象が 补近 
に 起き， そして， たまたま 家の^ 棚に あつ 
た 超能力 に 関す る 野心 的 かつ 学問的な 本 を 
読み ました。 このよう な 機会に 恵 ま れた も 
のとして， しかも 科学者の ひとりと して， 

今度 は n 分の 方法で 能 勅 的に （ちょっと だ 
け） 踏み込ん でみたい と, b います。 s いな 
に は ぴったりでしょう。 ライン 助教 抆の は 1 
いた ものと 同種の r ゼナ一 カード」 もた ま 
たま 手に入つ たこ とです し。 


'ま どきの 神サマ j, JICC 出版 
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知能 機械 概論 JA1 


—―^ ― 第 5/ 回 1 

猫と コンピュータ 

PTAfl, 廬雇膨 

Takazawa Kyoko 

高 沢 恭子 


も う 少し 冷たい 夜明けが 来て ほしいのに， 
小鳥が 飛び去る かすかな 気配と ともに， 窓 
辺 は 一面， 湿つ た 光 を 浴び は じめ る。 

午前 6 時， 毛皮 を 着た 気の毒な ホン ニヤ 
ァカ ! ， ベッドに していた 食卓の 椅子から， 
コ トンと 降りる 音が する。 なぜか クーラ一 
のきいた 部屋 を 嫌って， リビングの 気に 
入つ た 場所で 眠 る ことにして いるの だ。 

時計の 音で 目 ざめ るの かどう かわから な 
いが， ホン ニヤ ァは 6 時になる と 寝室の ド 
ァの 前にき て， 「もう， 起きて ょネ」 と 声 を 
力' ける。 

さそわれて ドア を あけ 一歩 踏み だす 床 か 
らは， なまあたたかい 湿気が 上って きて， 
今日 1 日の 意欲と 計画 を， 足元から く じけ 
させよう とする。 やつ と 梅雨の 明けた 7 月 
なかば， ふと， これから やってくる 盛夏 を 
思う と 弱気になる。 あの ひんやりした， さ 
わ やかな， はげま し に 満ちた 朝 は もうこな 
いの かな。 

で も だい じょう ぶ， 予期す る 猛暑 は お そ 
ろしい けれど， 現実に 出会う 真夏 は 楽しい 
もの だ。 いつも， 新しい H が 侍って いる。 

序盤戦 

始まる ま でが 大 さわぎ。 これから 何が お 
こ る の 力'， ど ん な ひ ど い II にあう ことに な 
るの か を， 想 像して いる と きがいち ばん コ 

ヮ い。 

春， PTA の& 委員 を， ク ラスの 中から 決 
める 日 は みんな コヮ くて つらい。 つらい か 
ら この 日 は 出て こ ない 人 も 多い。 なぜつ ら 
いか という と， 委員になる の をお たがいに 
ゆず り 合う のがつ ら い。 

「ゆずり 合う」 と は， 別の 言い方 をす る 
と 「逃れ 合う」 ことなので， 逃れ 合いの た 
め に， じぶんが ど ん な に忙 し く て， 委員 と 
しての 時間 を 持つ こ とが 無理で あるか を 競 
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争し なければ な ら ない の だ。 

この 競争 は ルール も 基準 もない から， 根 
本 的に は 無効な の を みんな 承知 している。 
だから， この 競争に 勝った とき もまた つら 
い。 委員に なって しまった 人と じぶんと， 
どちら が 時間 的 な ゆ と り が少 ないか な ん て 
とうてい わかる はず もない し， 時間の あり 
な しで 委員 を 「選出」 する じ ぶんた ちの 失 
策に ついて， けっして 語れない のがつ らい 
の だ。 

「あの， 校外 補導 委員と いうの を やり ます。 
そ れで， きょうは ちょっと 予定が あ り ま す 
ので， 帰 ら せて いただき たいんで す け ど」 

やむ を 得ない 早退の 交換条件 として， い 
ちばん 無難に 見える 委員会の 一員 を 志願し 
た。 とりあえず クラスからの 「選出」 を受 
けて， その 委員会の 構成員と なり， 委員長 
選 を 逃げ きれば いいの だ。 その 程度の 任務 
な ら， なん とかつ とま る だろ う 。 学年 委員 
も， 広報 委員 も， 成人教育 委 II も， だいた 
いそんな ぐあいに ヒラ 志望で 各ク ラスから 
出陣して い く 。 

半死半生 

数日後， 各 委員会の 初 会合 は 正副 委員長 
選出の 卷。 ここに 来る のが やっとの 思い， 
も う この 上 はぜった い 後に 引かぬ， いや， 
前 に は 出ない 決意の 面々 力、 それ は それ は 
こ わば つた 表情で に ら みあう。 

校外 補導 委員会 は， 委員長 1 名， 副 委員 
長 5 名 を 選ばなければ ならない。 全校 24 の 
クラスから 1 名ず つ， 24 名の 委員会 だ。 

インス トラクタ 一役の 前年度 委員長が， 
「まず 各 学年から 2 名ず つ， 計 6 名 を副委 
員 長と して 選出， その 中から 1 名 を 委員長 
としたら どうでしょう」 と 提案。 

ただ ひとり， 3 年生の スィ トウ （水 藤） 
さんが 「副 委員長なら」 と 名乗り を あげた 


小さい 頃， いつも f "いったいなん のために あ 
■ るんだろう」 と 不思議に 思って いた p 丁/ V 
それ は 子供 だけで な く 実際に 参加 している 
おかあさん たちち 感じて いるら しい。 さあ, 
いまこ こに PTA の 実態が 明かされる I 


だけで， どの 学年 も， 長い 長いう かがい あ 
いが つづ く 。 

「それで は クジに しまし ようか？」 と 前 
委員長。 無策の 切 り 札 はいつ も アミ ダく じ。 
スィ トウさん の 分 をの ぞいて， 3 年生 は 1 
名， ほか は 2 名ず つが 泣き 泣き 決定。 私 は 
ヒラ 委員に 逃れる。 

そして 6 名の 副 委員長が 委員長 選出の 話 
しあい を 始め， ヒラの 18 名 は 申し わけな さ 
と と も に 静観す る。 

こ こで 前 委員長の 善意の ひと こ と。 

「 3 年生の 親 は， 受験 準備で な に か と 多忙 
ですから， 委員長から ハズ してやつ たほう 
がよ いと 思います」 

ご 本人の 体験からの 発言だった が， 結果 
的に はこれ が 波紋 を 呼んだ。 委員長の 選出 
範囲が 1， 2 年生に 限られ， 該当者 4 人の 
戦慄が 一気に 高ま つ たの は 当た り 前 だ。 

ただで さ え 不信 感で いっぱいの 初 顔 あわ 
せの 会合に， 不平等 感が 加えられて， 委員 
長 選 は 殺気 をお びてきた。 

長い 重苦しい 立往生の あと， とうとう 1 
年生の 副 委員長から 「3 年生が やるべき で 
しょう！」 と 悲鳴に 似た 声が あがった。 

「なぜ， 1 , 2 年生の 親が 委員長に な ら 
な ければ いけな いんです 力'。 3 年生が や つ 
て A た り 前で しょう。 私 は 副 委員長 を 降 り 
させて もらいます」 

そ う なんだ， 親が 受験す るので もない の 
に， 委員長 をまぬ がれる の は ヘン だな と 思 
つていた。 でも， 3 年生が やる のが 当たり 
前と いうの も 少しち がう。 

「私が 委員長 を や ります」 

3 秒 ほ ど あとに ヒ ラの はずの 私が 挙手 し 
ていた。 中学校の PTA に はけつ して 関与 
すまいと， 2 年間 逃げ まわって いた 私が や 
るべき だと， あっさり 観念した の だ。 

降りて しまった 人 は， 「燃え尽き 現象」 


でい ま 社会に 問 題 を 投げ かけ ている， 多忙 
の 花， 看護婦さん だった。 怒って 当然 だ。 
看護婦 さ んの 非人間的 重労働 を， 私たちと 
同列に していた のが 悪い の だ。 
それにしても， そんなに みんなが 嫌う P 

TA にして しまったの は， いったい 誰なん 
だ。 幼稚園 以来， 恐 かしい 引き受け かた， 
押しつけられ かた をして きた， ニガ あい 思 
いと 共に， 義務教育 最終 年の 反省が おそつ 
て き た C 

「お子さん ヒ トリ？ じ やで きる じ やな 
い」 「お ゥチ にい らっしゃ るの？ だった 
ら なされば」 

誰 も PTA の 内容な んか 考えて い ない。 
子供の 数と ヒ マの ぐあいで 成り立つ てる P 
TA が， いかに 力 ラッポ か， みんな 知って 
る。 そう やって， じぶんたちで つまらなく 
してし まった PTA に， みんなで 意欲 をな 
く している の だ。 

こうして， 毎年， PTA は 仮死 状態で スタ 
一 卜する。 

一部 ハイテクで 

始まって しまえば， コヮ いほ どの こと は 
何もな く， よくも 悪 〈も レールが 敷かれて 
いるの が PTA だ。 この レール を 切断 させ 
ない こと 力 す， きっと 最大の 目標な のだろう。 

行事 計画の た めに さっそく 委員会 を IIH こ 
うと， 名簿 をた よりに 電話 を かけて みて お 
どろいた。 FJ 中 家に いる 人なん て 皆無 だ。 
これで はたし 力' に， 委員の 仕事 は むずかし 
い。 しかし， すべて 夜 を 待っての 進行と い 
うの も 困った もの だ。 

委員会の 開催 も 土曜の 午後の 2 時間が や 
つと， よほど スピーディに 運ばない と 行事 
はこな せそうに ない。 こんな ことなら， み 
ん なに ラクを させて あげようと， 8 割 準備 
作戦に 出る。 

事前に 計画案， 実行 案 を 文書で つく り， 
こんな もので いきましょうと， 強引にす す 
めて しまう やり かた だ。 もともと 前年度の 
行事 を 踏む のが 基本 だから， そ れほ ど の |i!J 
題 も 起こらない。 これで だいぶ 時間の 節約 
になる。 エディタ， ヮ一 プロ， プリンタ， 
コ ピー 機の 大 活躍 だ。 

お母さん 業と おつ と めで いそがしい 委員 
一同 は， 1 分で も 早 〈帰宅で きる こと を 喜 
んで くれる。 

さて， 委員会の 初 仕事 は 恒例の 「夏休み 


夜 |!;| パトロール」。 全校 936 名の 保 
護 者 全員が， 夏休みの あいだ， 夜 
の pi 了をノ 、。トロールす るの Af。 この 
ための， I] 程と チーム 編成 名簿 を 
つくって， すべての 保護者に く ば 
ら なければ ならない。 

讁案ゃ 作業 プラン は パソコンで 
やって きたけれ ど， 委員 みんなで 
やる 名簿 づく り は 手仕事 だ。 まず， 
全校 生徒 か ら 個人の データ を あ つ 
める。 住所， 氏名， 電話番号， 当 
校 在籍の 兄弟の 氏名 を 記入 し て も 
らい 個人 票 をつ く る。 すべて これ 
によって 名簿 づく りが 進行す る。 

通学 区域に は 6 つの 町が あつ 
て， パト 口 — ノレ も 町 単位で 行 わ れ 

る。 名簿 は 各 町に 人数 ぶん 必要に 
なる。 全校から 集められた 個人 票 
は 6 つの 町に 分類され て， 同じ 家 
庭から 通学す る 兄弟 も ひとつに ま 
とめられる。 

町 ご と に， 生徒数 をパ 卜 ロール 
の 実施 日数で 割り， 各 班の 人員 を 算出。 住 
居 表示 を 若い 順から 並べて いき， H 割りし 
ながら 当番の 氏名 を 書き こんでいく。 

できあがつ た 名簿 はふた たび， ft 学年， 
各 クラスに 分けられて， 生徒 を 通じて 保護 
者の 元に 届けられる。 

麵の 淵から 

,7 月初め ま で に 完成の 予定で， 名 簿づ く 
りの プロセス は 始まった。 

ところ 力 f , ひそ かに 予想 し た とおり， 作 
業の じっさい はな かな か 問題が あ つた。 ま 
ず， いちばんの 根拠になる 個人 データ 力 f , 
生徒た ちの 手書きで ある こと。 こちらが ヮ 
一 プロ で 準備 した 書式に も 問題が あ つ た か 
も しれない が， 文字の 不明瞭， 記入の 不完 
全の ために 判読に ま よった。 中には 欠席し 
た 友人の デー タ の 代筆 も 多く， 内容 その も 
のの 誤り もあった。 

つぎに， 住居 表ポ が， 町名 以外 はすべ て 
数字で ある こと。 丁目， 区画， マンション 
名， 部屋 番号が 数字 だけで 識別され る。 そ 
のために わずかな 数字の ちがい 力 ; ， 大きな 
分類ち がいになる。 また， この 千に 近い 数 
字 を 若い 順に 並べる 仕事 は， やって みると 
とても たいへん なの だ。 
あんのじょう， できあがつ た 名 簿が 保護 



K の 几に おいた と たん, おおや 分類ち 力 f い 
の 苦情が ひき も き ら ない。 個人 票の 欠陥 や 
書き写し 時の ミス などなど， いろいろな 原 
因 だ。 

こんな こと， パソコン を 使えば パー フヱ 
ク トに 近いのに。 学校の 名簿 を 借りて 個人 
の データ を 入力 すれば， あと は 表 集計の ソ 
フ 卜 がみん なやって くれる。 

兄弟 姉妹の 一括， 町の 分類， 住居 表示の 
昇順 整列， 日 分け， 印刷。 できあがり も 手 
書きより は 上等 だ。 土曜日 ご と に， 必死の 
思いで かけつけて， あたふたと 家路 を た ど 
る 委員た ち は， もっと ラク になる。 

と， ここまで きて， ふと 気がついた。 ラ 
ク になって， なんにも 仕事の ない PTA こ 
そ 最悪な の だ。 手間と 時間の かかる こ と を 
どんどん 切り捨てて， 合理化 だけ を 提案し 
た ら ， 仮死 状態 の PTA がもう 一 度 死んで 
しまう。 だから， 今の PTA に ハイテクの 
ススメ はでき ない。 

でも， ほんと にそうだろう 力'。 あきらか 
に 機械の ほ う がふ さわし いとわ かってい る 
こと を， いつまでも 手 作業で つづける のが 
正しい のだろう 力'。 

機械に まかせたら， あとに 何も 残らない 
PTA なら， 一度 絶命す るの もい いか もし 
れ ない。 
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[第 4 話] 


流行歌 を 追え! 


TAKAHARA HIDEKI 


高原 秀己 


ぼ く は 比較的， 歌謡曲 も ニュー ミュー ジ 
ックも ポップス もと 分けへ だて な く 幅広 く 
聞く ほうで ある。 しかし， 歌手の 顔と 名前 
がー 致 しない ケース が 極度に 増 えてき たの 
は 困った 状況 だ, 

最近， テ レ ビの歌 番組 を 見る ことが めつ 
たにない ことが 大きい のだろう。 コンサ 一 

卜に はもち ろん 行かない。 FM ラジオで 間 
いて， CD を レンタル 店で 借りて， 気に入つ 
たら 買う， という パターンば つかりな ので, 
「 实物」 を 見る 機会 は ほとんどない。 これ 
では， 歌と 歌手の 名前が 一致 しないの も 無 
现 がない と こ ろ だ。 

もちろ ん Wink は わかる。 永 井 真理 子 も 
わかる。 だが PRINCESS PRINCESS をバ 
ラ バラに される と， かなり 危なくな つてく 
る。 ティーンエイジャー 歌手 も ダメ。 そし 

て 何よりも， 特に 最近 ミュージック シーン 
で 頭角 を 現して き た 新進 バン ド はわから な 

こうした 人気 パン ドの驮 は ひと 通り は 聞 
いている。 たまや 米 米 CLUB はもち ろん， 
BAKUFU- SLUMP, BEGIN, JITTERIN' 
JINN, X, LINDBERG …… と 最低限の ヒ 
ッ トメ一 カーの 歌 は 聞いて いる し， 10 曲く 
らい は カラオケで 歌える よ うに はして ある。 

こ う した-: ft を 歌って， 
「いまの 敏は 何？」 
というよ うな ォ ジ サン は 論外 としても， 結 
構 知 ら ない 荇 手の 同僚 は 多い。 

もっとも， 歌 はお II つていて 歌えても， お i 
まで ははつ き り わからない という 人 は ぼく 
だけで もない よう だ。 それからい 〈と， ぼ 
< は- T- 均 的な のか もしれ ない。 

それにして！)， 最近の ミュージック シ一 
ンは バンドの 台頭に より， 激変して いると 
いって 間 迹 いない。 そもそも は アイドル 偏 
重 だつ たわけ だが， バン ドの 登場に よ り ， 
ァ ィ ドル 歌手の ヒ ッ ト チヤ一 卜 における 上 


位 進出 は こ こ 半年で 絶望的な 状 i 兄 となって 
いる。 入 気がなければ， ゴールデン タイ 
ム あたりの テレビに は ホイ ホイ と は 出られ 
ない。 そのせ い 力'， アイドル 耿 手の 出番 は 
午後 5 時 以前に 追い やられて しまった。 それ 
に 歌 番組 自体が 少な くな つたこと も ある （深 
夜 以外 は)。 

ま た， 彼 ら はテレ ビ出演 よ り も CD 販売 と 
か コンサート を 重視す るので， ぼくたち は 
歌 を テ レ ビの歌 番組で Itfl くこと よりも， CD 
や コンサート で 問 く ほ う が 主体に なって き 
たのだろう。 

ところで ノ f ンド， 特に アマチュア パンド 
は 自 然 発生 的に わ き II', て き た も の なの だろ 
うか？ もちろん 「イカ 天」 などの 舞台 設 
定が 整つ て， 彼ら 自 身の 登竜門が で き た こ 
と は 大きい。 だが， それだけ かとい うと， 
そうで もない よ うだ。 

X- OVER NIGHT ら し く ， 深夜の 推論 を 
してみ る と …… 

ヒット メ 一力 一で な い 場合， 彼 らは いわ 
ゆ る フリーター， つまり 定職 は 待たずに ァ 
ル バイ 卜で 自由に 時 問 が 使える ようにして 
収入 を 確保す る 場合が 多い という。 

ァ ル バイ ト で 生活す るな ど， ちょっと 前 
はかな り 難しい こと だつ た。 それに 耐えて 
今日が ある， なんてい う 元 劇 B1 出身の 俳優 
の サクセス ス トー リーが ある く らいた' から， 
突 態 は 想像で き ると いう も の だ。 

と こ ろが 昨今の 経济 情勢 を 眺めて みる と， 
アル パイ トの貨 金が このと ころ ゥナギ 登り。 
普通の アル バイ ト でも 束 京で は 時給 1,000 
FJ 以上の 求人が ごろごろ している く ら いだ。 
もちろん 銀行， 証券 関係の 会社員 や 待遇の 
いい SE なんかに は 及ばない ものの， そこい 
らの 製造業 系 中小企業 なんかに 比べる と， 
ずっと 収入 はいい。 アル バイ 卜で 食いつな 
いで メ ジャーになる チャンス を 待つ こ と は 


十分に 可能な 時代と なって いる。 

さらに 世の中の 雰囲気と して， 経済状況 
が 見かけ上に 過ぎない にせよ 余裕が 出て き 
ている ため， そうした 生き方が 許容され る 
よ うにな つてき たという 変化 も 見逃す こ と 
はでき ない。 髮の 染め 方 や ファッションが 
英国 系 ミュージック シーンの 流れ を 追って 
いる ことと， 英国 風の いい ？ま 味で 退廃 し た 
生活 パターン とが ダブって 〈るよう な 気 も 
してし まう。 

もう ひとつ， これ はこ じつけ つぼい のた' 
が、 来 南アジアから やってくる 苦学生 や 労 
働 者が 急増 している こと もあって， 他 入と 
自分 を 意識的に 区別す るた めに, ほかの 先 
進 国風の 生活 を 追ってみ る という 機運が あ 
ち こちで 出て きている こと も， 兌 逃せない 
よ う な 気 もす る。 

こ ん な感 じで 考えて くると， バン ドの流 
行と 経済 情勢 と は 根の 部分で 因果関係 と し 
てつな がりが あるよ う な 気がして しまう の 
である。 

まあ 何に せよ， 杏 楽 業界 自体が 彼らの 台 
頭 もあって， アイ ドル 偏 ffi から 本当に； K 力 
の ある 歌手 を 求める よ う に 少しずつ 変わつ 
てきた こ とはいい こ となの だろう。 

も つ と も 現在の 形が 完成 形で あ る と は， 
とても 考えられない。 この 鍵 は メディアの 
変革に よって， かなり 左右され てく ると ぼ 
く は 思 う。 そもそも CD, LD の 普及に よ つ 
て， 音楽の 楽しみ 方 自体が 変わった こと は 
い う まで もない。 

ニューメディア ブームの お 先棒 を 担 ぐ わ 
けで はない 力、 これから は CATV, 衛 放 
送が よ り 普及す る だろ うし， ハイ ビジ ョ ン 
も てく る。 そして パソコン も， いま 考え 
られ ている 形ではないだろう 力 s , メディア 
の 端末機 と し て 活躍の 場が できて く る はず。 

はた して 音楽 と パソコンと の 未来 的な 関 
係と は …… 。 
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參 グラフ ィ ックの 統一 環境 

S-OS 企画 が スタートし， 同じ Z80 を搭 載 し た 
マ シンな ら MZ だろ う が XI だろ う が, はたまた PC- 
8801 だろ う が 同 じ オブジェクト プロ グラムが 動 く 
ようになって しばらく た つ た 頃の 話です。 ダラ フ 
イツ クも 統一-で きる ので はない かとい う 話が 持 ち 
上が り ま し た。 S-OS の 系譜 (12) で も 少 し 触れ ま 
したが, か く して グラフ ィ ックの 統一と い う かつ 
て ない 試みが な さ れ たのが 1986 年 9 月 号で 発表 さ 
れた MAGIC です。 

コマンド を 解釈 実行す る インタプリタ 型の グラ 
フィック ルーチンながら， 驚異的 な 描画 ス ピー ド 
で 3D もなん の その。 当時の 編集部で は 3D が は 
やって いた こと も あり， 青 赤 眼鏡 を 掛け 正 面体 
を グ ルグル 回す などと いう 遊びが 流行 しまし た。 

当然 機種 別 の プロ グ ラ ム です の で， S- OS 用の 
アプリケーション として は 発表され ず， 共通 化の 
別の 試み と し て 単体で 供給 さ れ ました。 しかし こ 
のま まで は マシン 語から 使う しかない ため S- OS 上 

の 高級 言語が グラ フ ィ ッ クルー チン と して サ ポー 

トす るよう になり まし た。 !• 、 ま では S- OS の ひとつ 

の 環境 としてなくて は な ら な !■ 、 存在です。 


部 

BILLIARDS 


參 あなた も ハスラー 

今月お 届けす る BILLIARDS は， この MAGIC 
と SOROBAN を 利用した SLANG の アプリ ケー 
シ ヨン。 グラフィック を フルに 使って， 色と り ど 
り の 玉が グリ ーンの 台に 美しく 表示され る 本格 
的な ピリ ヤード ゲームです。 

動き 始める と 白い 点 になって しまう の は ご 愛 
敬。 高速 化の ための 工夫で しょ う。 10 個の 玉が 動 
き 始める と， 動体の 衝突と いう 時間の かかる 計算 
を延々 と 繰り返す のです から Z80 に はかな り 重い 
仕事です （Z80 にも コ プロ セッ サがぁ れ ばな あ ） 。 
で も 総 じ て 市販の ビ リ ャ 一 ド ゲー ム 並に よ 〈でき 
てい ま すので， 楽しめる ことでしょう。 

編集部で は パン キングの 代わ り に ジ ヤンケ ンで 
先攻 後攻 を 決め， 対戦 9 ボー ル が 盛 り 上がって い 
ます。 皆さん も 友達 ど うし ワイ ワイ いいながら 挑 
戦して みて く ださ い。 

さて， 来月 は サブルーチン を ソースファイルで 
はな く アセンブルして 蓄えて お く ための ツール， 
リ ロケータ ブル ファイルに は 不可欠な ライ ブラ リ 
アンの 登場です。 
• S- OS の 系譜 （13) 

1986 年 11 月 号に 掲載され た エレ ショ ゥの レポ 一 
トは 16 ビッ トの XI, X68000 の 興^の レポートで 



始まって います。 斬新な マンハッタン シ エイ プ。 
65536 色の グ ラフィック。 ソフトがない な ど と ， 
現在の 状況 か ら は 想像 もで きないよう な 中傷が な 
さ れ たパソ コ ン 誌が あ つたこと を 思い出 します。 

この 11 月 号の SENTINEL で は ゲー ム が 2 つ 発 
表され ま した。 ひとつ は HOTTAN という パズル 
ゲーム， もう ひとつ は MAZE in MAZE という 口 
ール プレイ ング 風の 3D 迷路 ゲームです。 

HOTTAN は XI, MZ で大 好評 を 博 し た パズル 
ゲーム PITMAN によ く 似た ゲームでした。 土の 
中に 埋められた 宝 を， 土 を 掘 り ながら 集めて い く 
単 |i 屯な ゲームな のです が， 土の 巾に はおが あり， 
岩の 下の 土 を 掘る と 上から 岩が 落ちて きます。 ま 
た， 空中 を 動 く こ と はで きないた め ところどころ 
設置され た梯 をう ま く 使いながら 宝 を » めて いか 
なければ ならない という も のです。 

最近で は こういった ァ クショ ン 型の パズル ゲー 
ム が少 なくなって しまつ た よ う な 気が します。 ァ 
イデア 勝負で 作れる タイプの ゲームで すから， ひ 
ねった 投稿に 期待した いと ころです。 も う 一方の 
MAZE in MAZE は キャラ クタ を 使って 3D 画面 
を 構成 し た， 気軽に 楽しめる 迷路 ゲー ムで し た。 

読者の 皆さんの なかに も 情報^理 試験 を 受け 
よう と 思って いる 方 もい らっしゃ るかと 忍い ま 
す。 第 2 種 情報処理 試験の アセンブリ 言語の 試験 
に は COMP-X という 仮想 CPUffl のァ セ ン ブラで 
あ る CAP-X が 使用 されて きまし た。 S- OS では 
1985 年 10 月 号で CAP- X を 発表 しています。 

しか し， COMP— X は あま り に实用 的で ない と 
の 批判 か ら ， 1987 年 4 月 実施の 第 2 種 情報処理 試 
験 以降 は COMET という 仮想 CPU 用の ァ セン ブ 
ラ CASL に 変更され る ことと なり ま した。 1986 年 
12 月 号で はこの COMET のシミ ユレ ータ と CASL 
が 登場して います。 

CASL は ZEDA と 同様に 使用で き る エディ タァ 
セン ブラで， 得ら れ た 才 ブ ジ ェクト を COMET シ 
ミ ユレ ータ で^ 行させる こ と 力? でき ま す。 受験 を 
考えて いる 方 は バックナンバー を 引つ ばり ,屮, し て 
試して みて はいかが でし よ う。 
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全 機種 共通 S-OS"SWORD"' 要 


BILLIARDS 


Kaneko Isamu 

金子 勇 


SLANG, SOROBAN, そして MAGIC 。共通 システム とし 
て 発表され た 多くの 優秀な パッケージ 群 を 集大成して， グラフ ィ 
ッ ク 対応の ビ リ ヤード ゲームが 登場です。 多 く の 要素 を シミュ レ 
一 卜した リ アルな ゲーム 感覚で 八ス ラー 気分 を 味わって く ださい。 


:■■ SLANG と MAGIC を 使つ た ビ リ ャ 一 ド 
ゲーム を 作つ たので 発表 し ま す。 S-OS 対応 
といっても なめて はいけ ません。 回転 も 計 
算 してお り， 押し 球， 引き 球， ひねり， 力 
—ブ ボール， マッセ な どもで きます。 S- OS 
と 関連 システム だけで もこ こま でで き る と 
いう ところ を 見て く ださい。 

なお， この ゲーム を 動 かすた めに は 
SLANG の ほかに MAGIC と SOROBAN が 
必要です。 ま た， 残念ながら SLANG のォ ン 
メ モ リ 版で は メモリ が 足 り ない ので コ ンパ 
ィル できな く なって しまい ま した。 


入力 方法 


まず， グラフィック ライブラリの ソース 
をお 手持ちの エディ タで 入力 し, GRAPHICS. 
LIB の 名前で セーブして く ださい。 

次に ビリ ャ一 ド プログラムの ソース リ ス 
トを 入力して セーブし ます。 その あと コン 
パイルす る わけです 力 5 '， そのまま では ハツ 
シュ テーブルが 足りない の で SLANG の 
3012 H を 80 H ， 3013 H を 01 H に してから コンパ 
ィル します。 なお， コンパイル する 前に 
SOROBAN を NEW LOADER で 9F00 H に 
組み込んで おいて く ださい。 

コ ンノ、 M ル中， SOROBAN. LIB と GRA 
PHICS. LIB を インクルード します。 コン 
パイルが 終わった ら， 

S BIL:5000:9569:5000:9000 
として セーブして ください。 その あと， 
SOROBAN および 各 機種の MAGIC と BIL 
を 読み込み， 

S BIL:5000:C1FF:5000 
のように まと めて セーブし ま す。 次回から 
はこの BIL を 読み込む だけで 実行で きます。 
なお， 実行時 は 25 行 スクロール モードに し 
て く ださ い。 
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操作 法 


こ の ゲーム は ピリ ヤー ドの 9 ボールの シ 
ミュレ ーシ ヨンです。 球の 打ち方から 説明 
しましょう。 まず， 方向 を 決め， キュー を 
持つ 手の グリップの 高さ を 決め， その あと 
ボール を 打つ 力の 強さ を 決め る と 球が 打て 
ます。 方向の 選択 は 7 と 9 で 10' ずつ， 4 と 
6 で 1 °, 1 と 3 で 0. 1" ずつ 行 う こ と がで き 
ます。 

方向が 決ま つ た ら スペース を 押 します。 
ボールの どこ を 突く か は 2, 4, 6, 8 で 決め， 
グ リ ッ プの 高さ は 2 , 8 で 決め ま す。 

この グリ ップの 高さ と い うの をな にに 使 
うの かわからない 入 もい るで しょ う。 球の 
端 を 打つ とき グリ ップを 上げて おくと， そ 
ち ら 側に 曲がる カーブ ボールに でき る ので 
す （ジャンプ ボールに はなり ません）。 

通 後に 打つ 力の 強さ を 決定 します。 マー 
力 一 が 動 くので 好きな ところで スペース を 
押してく ださい。 マーカーの 位置 は 右側の 
ほ う が 強 くなります。 


9 ボールと は 


9 個の 番号の ついた 的 球と ひとつの 手 球 
を 使って やる ピリ ヤー ドの ゲームです。 

的 球の う ち 番号の いちばん 小さい も のに 
当ててから 的 球の うちの どれ か を ポケッ ト 
に 落とします。 うまく 落とせたら 同様に プ 
レイ を 続けて いき， ひとつ も 球が 落ちな か 
つたり， 違う 番号の 球に 最初に 当たったり 
するともう ひとりの プレイヤーと 交代です 
(といっても， この ゲームで は コンビ ユー 
タ との 対戦 はでき ません から， 対戦 相手 を 
どこかで 調達し なければ な り ません）。 目的 
は 9 番の球 を 落とす ことです。 それまでの 


経過に 開 わらず， 先に 9 番の的 球 を 落とし 
たほうの 勝ちとなります。 細かい ルール は 
省略し ます。 人に 聞く 力'， 本 を 読んで くだ 
さ い。 
參マ ッ セ 

特別な 打ち方と して マッセが あ り ます。 
これ は キュー を 立てて 突く 方法で， 球 を か 
な り 曲げる こと がで き ま す。 ただ， 思い ど 
お り に 打つ の は 難しいで しょ う。 

マッセ を 使う に は 方向 を 決めた あとで M 
の キー を 押し マッセの モー ドに 入らなくて 
はなり ません。 ちなみに， このと き决 める 
方向 は 自分の 向き， つまり どの 方向が 正面 
になる か を 表します。 

次に 上から 見て どこ を 打つ か を 決め， グ 
リ ッ プの 位置 を 決め て （ 2 を 押す ほど グ リ 
ップが 傾いた ことになる） 打つ 力 を 指定し 
ます。 以上で マッセが できます。 


特別な キー 操作 


通常の ゲーム 進行に 関わ り ない モード 切 
り 替えの キーと していく つかの キーが 使用 
されて いま す。 
H ヘルプ モード 切り替え 

方向 選択の と き に 押す と 有効です。 こ の 
モ 一 ド で は 手 球 と 的 球の 当たる 位置と 当 た 
つた あ との 手 球と 的 球の 進む 方向 を 表示し 
ます。 ただし， 回転 は 考えて いません。 
R リ プレイ 

これ を 押す と 球の 配置が 1 打 前の 位置に 
戻ります。 
ESC-n 移動 

エスケープ キー （ブレイク キー） を 押し 
て 0 〜 9 の キー を 押す と 好きな 球 を 移動 さ 
せる こ とがで きます。 

その ほ 力'， 球が 動いて いると きに 1, 2， 
3 の キー を 押す と 表示 モー ドを 変更で き ま 


す。 1 な ら球を 点で 表し， 跡が 残 り ま す。 

2 では 跡 は 残 ら ないようになります。 3 な 
らば， ちゃんと 色分けした 丸い 球 を 表示し 
ます。 本当 は 3 の モードで 使いたい ところ 
です が， 遅い （MAGIC の CIRCLE FULL を 
使って いる） ので 速い のが 好きな 人 は 1 か 
2 を 使い ましょう。 


プログラム について 



実行 すれば わかり ますが， 実行 速度 は あ 
まり 速くありません。 これ は 表示に MAGI 
C を 使用し， 実数 演算 を 多用して いる こと 
によ り ます。 MAGIC 自体 は 高速 かつ 高 機 
能 な グラフ ィ ックパ ッケー ジ です が, こ こ 
で 必要 とされて いるもの に 対応す る に は 
MAGIC が 提供す る ものより もっと 単純な 
処理で いいわけです。 演算に ついても 実際 
に は 固定 小数点 演算で もで きる のです が， 
試しに やって みたら 誤差が ひどい ので やめ 
ま した。 

この プログラムで はでき る だけ 動き を 本 


物に 近づけ る た め に 球の 回転 まで 考えて い 
る ので 実数 演算で な いと つら いのです。 プ 
ログ ラム 中で は 球と ラシ ャ の 摩擦， 球と ク 
ッ シ ョ ンの' t 擦， 球 同士の 摩擦 を 計算 し て 
いるので， 球 はかなり 複雑な 動き をし ます。 
た と え ば， 入射角 と 反射角 が 等 しくない な 
ども ありう るので す。 

ただ， 速度: 1 视 のために 球の 当たり 判定 
で 少し 手を抜い て ある ので 球が 3 つ 以上 接 
触 して 並ぶ と ， 思い切 り 打つ た 手 球が す り 
抜けたり する こと もあります。 ただし， ブ 
レイクの とき だけ は 別 処理な ので ご 安心 を 。 
そのほか， ポケットの 5i 理が 結構 いい加減 


リス 卜 1 GRAPHICS.LJB 


1 // graph ics lib 上 alv 
2 


4 
5 
6 

8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 


array Dyte co [ 
var tilel ,tile2; 

init( ) 
begin 

call ( $af 00 ) ； 
window(0,0,639, 19£ 
palet(l ( 2,3 ( 4,5,6. 


mode ( 2 , 2 ) 
mode ( 2 , 1 ) 
mode(2 , 0) 
end ： 


:ls( ) 
cls{ ) 
cls( ) 


mode ( mode , plane ) 
begin 

co[0】=7 ； 
co [ 1 ] =mode ； 
co [ 2 】 =plane ； 
co[3]=15; 

ix=&co ； 
call ( $b004 ) ； 
end ； 

cls( ) 
begin 

co[ 0] =9 ; 

co【 1 ]=15 I 

" ix=&co ； 

call($b004); 
end ； 

window ( minx , miny , maxx , maxy ) 
begin 

co[0]=6 ； 

memw [ &co+ 1 ] =minx ; 
raemw 【& co+3 ] =miny ； 
memw 【 &co + 5 】 =maxx ； 
memw[ &co+7 ] =maxy ； 


41 
42 
43 
44 
45 
46 


49 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 


65 
66 
67 
68 
69 
70 


co【 9】 = 15i 
A ix=&co ； 
call($b004 ) ； 
end ； 


palet ( a 1 , a2 , a 
begin 

co[0】 = 10 ; 
co[ 1]=0; 
co[ 2] =al 
co[ 3] =a2 ： 
co [ 4 J =a3 
co [ 5 ] =a4 
co[ 6 ] =a5 
co [ 7 ] =a6 
co[ 8]=a7 
co[9]=15: 
" ix=&co ； 
call { $b004 
end ； 


a4 . a5 , a6 . 


L i n e ( x 1 t 
begin 

co[0]=0; 
co[ 1 】=2 ； 
memw[ &co + 2 】 =xl 
memw [ &co+4 ] =y 1 
memw[ &co+6 ] =x2 
memu'[ &co + 8 ] =y2 
co[ 10]=15 ; 
A ix=&co ； 
call ( SbO04 ) ； 


74 

75 box(xl,yl,.\2,y2) 

76 begin 

77 co[0]=2; 

7 8 memw [ &co+l ] =xl 

7 9 memw [&co+3 ] = y 1 

80 memw[&co+5 j=x2 



です。 角の 処理 はして I 
ョ ンな どもで き ません c 


'ない ので 角クッ シ 


本当な ら ジャンプ ボールに も 対応 させた 
かった のです が 遅く なる のと 表示が 難し く 
なる ので やめ ま した。 

S-OS 対応に 発表され た アプリ ケ一 ショ 

ン の な かで も 結構 凝つ た ゲ一 ム になって い 
るので はないで しょ う 力 1 。 

SLANG は なかなか 使いやすい 言語で い 
い と 思います が 実数 を 使う と 大変な こ と に 
な り ますね。 実数が 手軽に 扱える 言語が S - 
OS 用に ほしい ものです。 


8 1 memw[ &co + 7〗 =y2 ； 

82 co[9]=15; 

83 A ix=&co ； 

84 call($b004) ； 

85 end; 
86 

87 circle ( x , y , r ) 

88 begin 

89 co[0]=5 ； 

90 memw [ &co+ 1 ] =t 

91 memwf&co+3】=tile2; 
9 2 tnemw[&co + 51 = 

93 memw[&co+71= 

94 memw[ &co + 9 J = 

95 co[ 1 1] = 15 ； 

96 "ix=&co; 

97 call($b004) ； 

98 end; 
99 

100 full{xl,yl,x2,y2) 
101 begin 

102 co[0]=4 ； 

103 memw[&co + :U= tilel ； 

104 memw[&co+3"tile2; 

105 meinw[&co + 5 ] =x 1 ； 

106 memw [ &co + 7 J = y 1 ； 

107 memw[ &co + 9】 =x2 ； 

108 memw[&co+l 1 ] =y2 ； 

109 merm"&co + 13〕 = 15 J 

1 10 "ix=&co; 

111 call{$b004J ； 

112 end; 
113 

114 mask ( tl , t2 ) 

115 begin 

116 tilel=tl ; 

117 tile2 = t2 ； 

118 end; 
119 


— « 

m 

00 

m 
z 
—I 

m 
「 
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リス 卜 2 BILLIARDS 


BILLIARDS 1990/4/19 
Programed by isemu Kaneko 


org $5000； 
offset. $4000; 
work SdOOO; 


»inc 丄 ude SOROBAN.. 
♦ include (31APHIC. 


pi =308, 
p2=pl*2; 


x2,x4,xxx,y2,y4 l yyy J pf,ap; 


cl[4I,!c2[4],!c3I4 
dtll4],!dt4[ lj, !dt 
x|9](4} t !vx[9](4] l 
y(9][4],!vy[9H4]i 
ww(9|[4],!slf9|[4] 
dra[4],!dni2t4],!tf4 


j ！ c4[4], 

0{4],!dtl00[4),!dtt00OI'l| 1 

:l[4] i !x3[4] , tdwx[4) , !rx[9]t4] , 
U-11, !y3[4],!dwyI4] 1 !ry|9]l4], 


vram[80 隼' 


!dw[4),!z[4|, 


main( ) 
1 begin 

dsinfilet ); 
pf=0; hl=0; 
repeat 【 
width { B8 ); initU; palet(I,2, 
for a=0 to 80*44 vramlal=255; 


«cvitf (t,80) ； 

«cvitf(cl,50); ecvitf(c2,10>; 

ecvitf(c3,ieB); «cvitf(c4,2 細 >; 
ecvit.f(dtl,l); 
ecvitf(dt4,4) ； 

apvitf(dtie,i0); 

Scvitf (dtlOO, 100) ； 
Sovitf (dtl000 t 1080) ； 


«cvitf(x(0 
8cvitf(x[l 
©cvitf(x(2 
acvitf(x[3 
eovitf(x[4 
9cvitf(x[5 
0cvitf (x[6 
ecvitf (x(7 
9cvitf(>:[8 
9cvitf(x(9 


amove I rx 
ftnove I ry 


rf2=l; 

mask ( $aa55 , Saa55 ) ； 
mode(3,l); 
fuH(ll,0,626,6); 
fuU(626 ( 6,B39,163); 
fulUll, 163,626, 169) 
fuj](0, 10, 11,163)； 
circle(ll,6.12); 
circle(626,6,12); 
circlet 11, 163,12); 
circle (626 ,163, 12)； 
mode(3,2) ； 

full(418,191 ,630,199 

fuiHU,6,6^B,lB3); 

full(80,198,12O,199) 

fulU 180,179,220,199 

masktJffff.Jffff); 

mode(Q,2); 

box( 18,9,619, 160); 

hoxU7, 9,620, 160)； 


^11(8*75+95,^,8*75+96,^)； 
i'ulHal75+95 1 lS6 1 a*75+96,l 


fulH6,a*37+48,7,a»37+48); 
^11(633,3«37+48,634,3*37+48)； 


model 3,k ) ； 
circle(22,12,18) 
circle(614,12,18 
circle は 2, は 7, 18 
circle<614, 157,1 
@COle{ 320,12,20 
cirole(320, 157,2 

mode(3,Z); 

mask ( Saa55 ， $aa55 ) ； 
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fulj.(19, 10,618, 159)； 
raaak($ffff,Sffff); 
for k=0 to 2 t 

mode(3,k); 

circle! 160, 189,20); 

circle(200,189 f Z0); 

] 

repeat 【 

mode(3,0) ； mask(0,0) ； 
full(19, 10,618,159)； 
,ma3k($ffff,$fm): 
for a=w downto 0 ( 
if f[aj>=l 1 

baU(8cvft:i(Jocta い， 6tovftUy>.【B 


for b=h downto Q ( 
fl[a]=0; 

xxx=9cvfti(x|a| I ； yyy=8cvfti(ylal ) ； 
8cvitf(vx|al ,0) ； ecvitf{vy|al,0»; 
dcvitf (uw[a| ,0) ; ecvitt'fslta] ,») ； ecvitf(s21a 
if f[a]>=l I 

if xxx, く. は ecvitf(x[a],15); 

if xxx. >. 304 ecvitf(xlaj,304>; 

if yyy.<.15 ©cvitf lyfa] , 15) ； 

if yyy.>.154 «cvitf (y[aj , 154 ) ； 

ball (®cvf'.i(xfal ) ,»cvfti (y(a H ( a, 1 ) ； 


ball number ( ) ； 

xxx=1800; yyy=0; f3=8; 
mask($ffff,$ffff); 
repeat [ 
Scvitf(iiD,10); 

fflcvitf (x3,xxx) ； ediv(x3,x3,dm) ； ©rad(x3,x3) ； 
esin(y3,x3); Soob(x3,x3) ； 

Scvitf (dm,300) ； emul(x3 t x3,dm) ； amil(y3,y3,din) ； 
8addtx3,x3,x); «add(y3,y3,y) ； «cvitf ldm,2) ； emul(x3,x3,din) ； 
x2=Scvfti(x)*2; y2=«cvfti(y); x4=ecvfti{x3J ； y4=8cvfti(y3) ； 
mode(l,0); 
Iine(x2,y2,x4,y4) ; 
hl2=0; 
if hi [ 
ecvitfldm, 10) ； 

«ovitf(x3,xxx); ediv(x3,x3,dml; erad(x3,x3); 

»ain(y3,x3); 8oos(x3,x3); 

atnul(x3,x3,dtlO); ftnul(y3,y3,dtl0); 

®move(vx,x3) ； 8roove(vy,y3( ; 

8mul{dm,vx,、TO ; ®imil(din2,vy,vy) ； 

dadd(dm,dm,din21 ; feqr(z t dm) ； 

9sub(xl,x，x【f2i): 

esub{yl,y,y[f2J); 

@mul(dm,yl , vx) ； 

emul(dm2,xl ,vy) ； 

dsub(dm,dm,dm2) ； ediv(rr,dm,z) ； 

@abs ( dm2 , rr); 

if 8ciBp(dm2,d"0> !=1 【 

ftnul(dm2,rr,rr) : 9sub(dm2,dtl80,dni2) ； 
«sqr(dm2,d]n2) ； dneg( tt, dm2> ； 

； «tnul(dm2,rr,vy) ； 
) ； Sdiv(dn),dm,z) ； 


ftnuKdm 
®sub(dm 
®add(dwx 
^nul(dm 
«add(dm 
8add(dwy 

»sub(yl 

@mul(yl 


； »div(dm,dm,7.! 


y|f2],dwy 

xl,dtl0); 

yl ,dtl0); 
roask{$ffff,9ffff) ； 
help_print( ) ； 


k=inkey( 1 ) ； 

mode ( 1,0) ； 

Iine(?c2,y2,x4, 

if hi2 I 
mask (0,0)； 
help_print( ) 


xxx++; 
xxx=xxx-lfl; 

KJCX=XXX+10; 

xxx=xxx-100; 
xxx=xxx+100; 

[ 

if hi then hl=0; else hl=l; 

for a=w downto 0 [ 
if ftal>=l I 
bainecvfti(x[aj),ecvfti (/[a] 1,255,1 

I 

for a=w downto 0 { 

@move(x【aJ , nc|a] ) ; 
emove(yIa],ry[n]); 

bfU 1 ( 9cvf t i ( x I a I > , Scvf'U ( y I a I し a , U ; 


二 プレゼント」 する そうだが， lo 年後に それ を lo ノ j 下 i て' ぶ t 

-, の » 示 板」 に ほ 場 しない か 心お であ る 。 神 生 総— (24) 北海道 


の ** 
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3 力 


1 

] 

if bk==2 bk=l: 


324 
325 
326 

@add 
@sub 
Sdiv 

yl &〗 ,y 【&: 
dw,vx[al , 
dm , dw , o2 

,vy(aj ) ； 
sl[al»; 

: ®add<sl【al,sUaI,dm); 

f 2=rf 2 : 


327 

®div 

dm,dw,c3 

； ®sub(vx[a] ,vx(a] ,dm) ； 

ball number 1 ) ； 

J 


329 
330 

> X： XI 

dm, vxfa] 
vx[a】 ， vx| 
dw , vy | a J 

a] ',dm)i . 
a2la]); 

I until ( k==' ' or k=='M' o 

r k=='m' ) ； 

331 

Sdiv 

dm,dw,c2 

； eadd(s2[aj,s2(a],dm); 

repeat ； until inkey(0)==0; 


332 

Sdiv 

dm,dw,c3 , 

； @sub(vy|.a] ,vy{a] ,dm) ； 

if k==' ' fm=0; else fm=l ; 


333 

«div 

dm,vy[aj ， 


x2=7; y2=7; 


334 

@sub 

v>-[a],vy| 

a] ,dm) ； 

repeat [ 


335 

b=ba 

1 一 check(®cvfti(>;|a】 ） ,®cvfti ひ laj ) ,a); 


model 1,2)； 
Hne(76+x2*2+fm*100 
line{86+x2*2+fin*100 
k=inkey( 1) ； 
line(76+x2*X+fm*100 
line(86+x2*2+fm*108 


182+y2 , 96+x2*2+fm*lU0, 182+y2 ) ； 
177+y2 , 86+\2*2+fm*100 ， 187 +y2 ) ； 


182+y2 , 96+x2*2+fm*100, 1824y2 ) ； 
177+y2,86+x2»2+fm*100,187+y2) ； 


y2++ 


】 until k==， ' ； 
\-2=x2-7 ； y2=y2-7 ； 
triiile inkey( 0) == ' ' ； 
if fm then sp=7 ； else ap=0; 
repeat [ 
mode(l,2); 

box 1 95+x2»2+fm* 100 , 187+y2-sp+fm*7 , lC5+)(2*2+fm* 100, 1 
k=inkey( 1 ) ； 

box{95+x2*2+fm*t0C,187+y2-sp+f'm*7,105+x2»^+fm*lO0, 1 
case k [ 


until k== ' ' ； 
rhile inkey(0 ) = 


+y2-si>+fm*7 ) ； 
+y2-ap+fm*7) ； 


ftb]>0 
®sub(xl,vxla] ,vx[b] ) ； 
®sub(yl,xta],x[b]); 
ftmul(dm,xl,yl ) ； 
(*aub(xl ,vy[a] ,vy[b] ) ； 
«sub(yl,y[a|,y(bn; 
S)nul(dni2 ( xl,yn; 
eadd(dm,dm,dm2) ； 
8cvitf (dm2,0) ； 

if ( ®cmp(dm,dm2) !=1 or f5(bj==0 ) [ 
esubtxl.xlel.xib]); 
®aub(yl ，y [&] ，y|bl ) ； 

®mul(dm,xi,xl); ®mul(dm2,yl,yl); ®add{r 
if ( f[a]==l or f[b]==l ) ( 

@mul (dm, vx[a] t vx[aj ) ； @mul ( dm2 1 v>- [ a ) , 

eaddtdm.dm.dmZ) ； ®sqr(z,dm) ； 

Ssublxl.xtaj.xlb]); 

Baub(yl,yfa],y|b]); 

®nul (dm, yl , vxja] ) ； 

emul1dm2,xl,vy[a) ) ； 

@sub ( dm , dm , dm2 I ； @div(rr,dm,z) ； 

®abs{dm2,rr) ； 

if ®cmp(dm2, dl.lO) !=1 [ 

•) ； お ub(dm2,dtlt)0,dm2 

@neg(tt,dm2) ； 
a】 ) ； @mui<dm2,rr，vy[s 
■{dm,dm,dni2) ； @div(dm,din,z) ； 


@add 


repeat ( 

looate(yyy,22) ； print ( " 
for a=0 to p2 a=a; 

yyy=yyy+ff ; 
if yyy>73 ff=-ff; 
] until inkey(0)==' ' ； 
ecvitf(dm,10»; 


) ； ®nul(diH2, 
®div(dm,dm,: 


®cvitf (x3,xxx) 
®sin{y3,: 
Scvitf (dm,yyy) 
Scvitf (dm 
®div(vx,v: 


@div(x3,x3.dm) 
®cob(x3,x3) ； 


®div{vy,vy ,dm) 


@rad 1x3, 
き u 丄 (vy ,: 


f @cmp(r,dtit>0} ！ 
ball co 丄 lide( 1 ； 


ap=8-sp; 
x2~-x2; y2=- 
ecvitf (dm,y2 
@mul(dm,dm, v 
©cvitf (dm,y2 
@mul ( dm , dm j v 


ftnuHsl ,vx,dm) ; @cvitf'(dm,: 
@add(sl,sl,dm); @mui.(sl ,s 
atiul(s2,vy,dm) ； ®cvitf (dm, 
@sub(a2,s2,dm) ； ®nu 丄 （s2,b 
@rtiv(vy,vy,dtl0) ； 


xxx=8cvfti(jc|a】 ） ； yyy=®cvfti(y【al 



®cvitf (dm,: 
dsn2); @add(sl ,： 
ecvitf'ldm,: 
@sub(s2,: 


H0l = 


®aub( w[a ] , 
8cvitf(dm,3 


if xxx.>.304 
@add { dw , v>' 
6sub( ww【a I 
ecvitftdm.i 


®add(dw,vx 
Scvitf (dm, 


®sub(dw, vxl 
®sub(ww[a] ， 
®cvitf{dm,3 


r{a| ) ； @mu 丄 (dw,dw,vx[aj 
) ； ®add(vy[al,v5 
©suh(.\[a] ,dm,x[a] ) ； ®neg(vx[a 


a I ) ; @mul ( dw , dw , vx [ a 
dw) ； @sub( vy[a] ,vy【a 
Ssiib(xta] ,dm,x[a\ 


' ； ®mu 丄 （ dw , , vy 【 a 1 ) ; @di 
I ； ®add( vxlaj , vx(a] ,dw) ; 
®3ub(y[a] ,dm,y(a] ) ; ®jiGg(vy[s 


a| ) ; @mul(dw,dw,\'y[i 


@sub(y【al ,dm,ytaj ) ； ®neg(vy[a) ,\->ia) ) ； 


.vy|al ) ； 


®m<)v(?(rx【£i】 ,x 
@nove ( ry [ a ] ,y 


®nove ( xx I a 】 , x 【 a い； Smove ( yy [ a 】 ,y[a 


ball(®cvfti(xx) ,®cvfti(yy) , 
locate ゆ, 23); print(" 
locate (yyy, 22) ； print に 

repeat [ 
k=inkey(0) ； 
case k [ 

pf=5; 
pf=3; 
pf=l; 

[ locate (0,0) ； st 


f pf>2 [ 
pf=pf-3 ； 


for a=w down to 0 
if f[a]==2 ( 
ball(®cvfti(> 


xxx. 

XXX. 


locate(0,23) 


prin 
Scvft 


flla]=l; 
ball— number ( ) 


be U < Scvf t. U xx 【 a J > ,®c\,f t i ( 5了 [ a 1 1 , 255 , pf) ; 
bill 1 (®cvff.i(x【al>,«cvfti(yla〗l ,a,pH: 
®niove(xx[a] ,x[aj ) ； ®nove(yy[a] ,y[a | ) ; 


[a] ) ,@cvftifyy(at 


a=w down to 1 
f ffa]==2 [ 
®addtx[aj ,x 


®abs(dm,vx[a] ) ； Sabaldmi: , v> [a] ) ； 
if ( ®cmp(dm,dtl)==-I and @cmp(ciin2,dt. 
®abs(dm,sl La] ) ； @abs(dmZ,32ta] ) ； 
if ( @cmp(dm,dt 1 )==-! and @cmp(dm2, 


'^が パ' ノコ ンを おう というので， ？ iCff 的キ It ゆ をけ L 


X68000PROII に 決めさせ ま した。 
04#教(30) 神奈川県 
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：應 I ： 誦應 

THE SENTINEL 


436 ecvitf(uv(a],0); ecvitf(al[a],0); flcvitf |32[a] ,H) ; 

437 ecvitftvxial.Gt; ftcvitf (vyjaj ,0) ； 
436 balKecvftifxtail.ecvftKvlaD.a.n; 

439 J 

440 1 

441 1 

442 if f[a)==2 1=1； 

443 ] 

444 ] until 1==0; 
446 

446 for a=w down to 0 ( 

447 if flaj>=l I 

448 bell (ScvftiUla] ) ,8cvfti(vla| ) ,a,l )； 

449 ] 

450 I 

451 ff=fl; 

452 if flt0]"l L 

453 locate(0,231; prin" "ス クラ サチ ！!" ) ； beep I に ff=l; f3=f2; 

454 J 

455 if f2!=f3 ( 

456 locate<0,23); print("77-V ！!" ) ； beep (に ff=l ； 

457 1 

458 if ff==l 【 

459 xxx=85; 

460 for a=l to w I 

461 if fl[a]==l [ 

462 while vraml 168(J+xxx/4 ] ！ =255 xxx=xxx-10; 

463 »cvitfU'【aJ ,xxx) ； 9cvitf (j|al ,85>; 

464 f[aj=l; fl[a]=0; xxx=xxx-10; 

465 J 

466 ] 

467 ball_number( ) ； 

468 scratch { ) ； 

469 1 

470 f2=9; 

471 for a=l to w 【 

472 if ( f[a]>=l and a く f2 ) f2=a; 

473 J 

474 if fll9]==l [ ff=2; beep{ J ； ] 

475 ) until ff==2; 


476 ] until 0； 

477 end; 
478 

479 ball„collide( 

480 begin 


481 if ( f3==0 and a==0 ) f3=b; 

482 if bk!=l [ 

483 eaublxl,x[a] t xtb]); 

484 6Jaub(yl,ylaJ,y(b]); 

485 Asub(dm,vx[al r vx[b] > ； @sub(dm2,vy(a】 ,vy|bj ) ； 
466 «niul{diii,dm,xl ) ； ebiul(dm2,dni2,yl ) ； 

487 Sadd(din,dm，dm2> SMiv(dm,dm,p) ； 

488 fln>uUdin2,dm,yl に dnuHdm,dm t xl ) ； 

489 eadd(vx[b] ,vx(bj,din); «add{ vy(b| , vyl bj ,dnt2); 

490 9sub(vx[a] ,vx(gl1 ,dm> ； 8sub(vy|a] ,vy[a) ,dm2) : 

491 Oadd(dwx,ww【aJ 'wwlbj に anundwx,dwx,dm2) ； 8div(dwx,dwx,c4) ； 

492 Seddldwy ,vn.'(a) ,ww[b] ) ； anuHdwx,dwx,dni) ； 8div(dwy,dwy,c4) ； 

493 dadd(vx(a) t vx[al ,dwx) ； eadd(ww(ft] ,ww(al ,dwx) ； 

494 Ssub<vx【b】 ,vx|bj ,dwxl ; Ssubtwwlb】 ,ww【bl ,dwx) ; 

495 9sub<vy[aJ ,vy【aj ，dwy > : @add(ww(a] ,ww[a] ,dwy J ; 

496 dadd(vy{b] ,vy[bj ,dw>') ； 9sub(ww[b] ,wwlbl ,dwy) ； 

497 if f[b]==l ball (envftUxxtbJ),ecvfti(yy I bj). 255,1)； 

498 f[a]=2; f[b]=2; f5[al=l; f5lb]=l; 

499 ] 

500 else [ 

501 break! )； bk=2; 
502 1 


503 end; 
504 

505 baU(x,y,c,f) 

506 begin 


507 var xx,>y,a; 

508 if ( \-.>=. 15 and x.< = .304 and y.>=.15 and y.<=.154 ) [ 

509 if f'.=2 

510 if f then bal l_l(x,y,c) ； 

511 else ball_2(x,y,c); 

512 else 

513 if c!=255 ball _2ix,y,c) ; 

514 xx=x/4; >-y=y/4 ； 

515 \Tamlyy*80+xxl=c; 
516 1 


517 end; 
518 

519 bal し l(x，y,c) 

520 begin 


521 x=x,*.2; 

522 tnodeU.0); 

523 case c ( 

524 2,4,0,9 ： ma.sk($fff'f,$ffff); 

525 others : mask{0,0) ； 

526 ] 

527 eireletx,y,9) ； 

528 tnodc(3,I); 

529 case c ( 

530 1,3,4,5,9,0 ： maak( $t f f f , $t'f ff ) ； 

531 7 : mask( $aa55 , Saa55 ) ； 

532 others : maskie.O) ； 

533 ] 

534 cirele(x,y,9); 

535 mode(3,2); 

536 case c [ 

537 1,6,9,0 ： niBBk($ffff,$ffff); 

538 5,255 : mash($aa55,Saa55) ; 

539 others : naak(0,0) ； 

540 I 

541 circle(x,y,9) : 

542 if c==9 [ 

543 maBk(Q,0) ； model 3,0 >； 

544 fulJ (x-9 , y-2 t x+9,y+l); 
515 J 


547 

548 ball 2(x r y,c) 

549 begin 

550 K=x.t,Zi 
55】 if c==255 [ 

552 mnde{3,0); mask(0,D); 

553 ] 

554 else [ 

555 mode(2,0); mask($ff"ff .Sffff ) ； 

556 】 

557 full(x-2,y-l t x+2 t y+l); 

558 end; 
559 

560 ball_check(x,y,c) 
561 begin 

562 var xx,yy,b,f ,d; 

563 xx=x/4-2; yy=y/4-2; 

564 b=yy*80+xx; 

565 f=255; 

566 for ^y=0 to 4 [ 

567 for xx=0 to 4 [ 

568 d=vrom[b); 

569 if ( dl=255 and d!=c and d<f I F=d; 

570 bf+; 

571 ] 

572 b=b+75; 
573 】 

574 retum(f ) ； 

575 end; 
576 

577 break い 

578 begin 

579 var a; 

580 3move{din,vx) ； 

581 aabs(dm,din) ； 

582 for a=0 to w [ 

583 acvitf(vx[a] ,rnd(800)-4«0) ； 

584 «div(vx(a] ,vx[aj ,dtimQ); 
5Bb @mul( vx【a】 ,vxlal ,dmK 

586 Scvitf (vy[al ,rnd{80O)-400H 

587 fldivlvyta] ,vy(al ,dtlO00); 

588 emuKvyial.vylal ,dm] ； 

589 J 

590 for a=0 to w [ 

5!H f[a)=2; ball(ecvfti(xx[a) ) ,8cvfti (yy|a| ) ,255, 

592 ] 

593 end; 
594 

595 scratch ( } 

596 begin 

597 maBk($ffff,$ffff); 

598 bal 1 (Qcvfti ( xx ) ,®evfti {yyl ,255, I ) ; 

599 for a=vi down to 1 ( 

600 if f[a]>=l [ 

601 ball{8cvfti{xxla]) ,ecvfti(y>'laJ) .255, II； 

602 I 

603 ] 

604 for a=u downto 1 [ 

605 if F[a]>=l [ 

606 ball(®cvfti(xlHj ) ,»cvfti (y【a 1 1 ,a,l>; 

607 ] 

608 I 

609 ball_move{0); 

610 f(0]=l; 
611 end; 

612 

613 ball_number( ) 

614 begin 

615 var a,c; 

616 for a=l to w [ 

617 o=a; 

618 locate(50+a*3,24); 

619 if f[a] ( 

620 print(a); 

621 ] 

622 else [ 

623 c=255; print に' ") ； 

624 】 

625 l(a*12+202,195,c); 
626 】 

627 end; 
628 

629 ball_move(e> 

630 begin 

6:11 var kk,xxx t yyy,k f a; 

632 if c I 

633 repeat [ 

634 repeat | 

635 k=inkey(l) ; 
63B k=k-'0' ； 

637 】 until k く 10; 

638 ] until F[k]; 

639 kk=k; 
646 I 

641 else I 

642 kk=0; 

643 k=f2; 

644 ] 

645 maak($ffff,$ffff); 

646 ball(8cvfti (x【kkj ) ,8cvfti(ylkk] ) ,255,1) ; 

647 xxx=®cvfti(x(kl); yyy=»cvfti (y[kl ) ； 
64B repeat I 

649 model 1,0) ； 

650 linelxxxi2-10,yyy,Kxx*24"10,yyy>i 

651 line(xxx*2,yyy-5,xxx*2,yyy+5) ； 

652 for a=0 to pi a=a; 

653 line(xxx*2-10,yyy t xxx»2fl0,yyy) ； 
f;fi'l line(xxx 韋 2,yyy-5,xxx»2,yyy+51 ； 

655 k=inkey(0); 

656 case k | 
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'6' ： if xxx. く. 304 XXX++; 
'8， ： if yyy.>. 15 yyy -- ； 
'2' ： if yyy, く， は 4 yyy++; 

] until k==' '： 

»cvitf(xlkk],xxx); «cvitf(y(kkj , 
balliecvfti(xlkk]),ecvfr,i(ytkk]) 
repeat ； until inkey(0)==O; 


help._print( ) 
var x,yl 
begin 

x=«cvftHdwx).*.2; 

y=«cvfti(dwy) ； 
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»18 部 思考 ゲーム JEWEL 
第 13 部 LIFE GAME 
速 載 基礎からの magiFORTH 
速 載 Prolog-85 入鬥 (31 

■ 86 年 5 月 号- 

第 20 部 スクリーン エディタ E-M ATE 
速 載 実戦 演習 magiFORTH 

■ 8B 年 6 月 号— 


第 21 部 Z80TRACER 

第 22 部 magiFORTH TRACER 

第 23 部 ディスク ダン フ& エディタ 

第 24 部 "SWORD" 2000 QD 

速 載 対話で 学ぶ magiFORTH 

特別 付 PC-8801 版 S-0S"SWORD" 

■ 86 年 1 月 号 一- 


第 25 部 FM 音源 ミュージック システム 
付 » FM 音源 ポート' の 製作 
速 載 計算 力 アップの magiFORTH 
特別 付お SMC- 777 版 S-0S"SW0RD" 
■ 86 年 B 月 号-一 


第 26 部 対局 五目並べ 

第 27 部 MZ-2500 版 S-0S"SW0RD'' 

■ 8S 年 3 月 号- 


第 28 部 FuzzyBASIC 発表 

遍載 明日に 向かって magiFORTH 

■ 86 年 t0 月^ — 


第 29 都 ちょっと 便利な 拡張 プログラム 
第 30 部 ディスク モニタ DREAM 
第 31» FuzzyBASIC 料理法く 1〉 
■ 86 年 11 月 号- 


第 32 部 ハズル ゲーム H0TTAN 

第 33 部 MAZE in MAZE 

速 載 FuzzyBASIC 料理法く 2〉 


model 1 
®add(dn 
0add{dii 

0 
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； 

<l ,dwx) ； 
yl ,dwy) ； 


1 ine;x 
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®cvfti(di 

i).».2,ecvfti(dm2)]; 

6teub(dii 

i( 

Lwx,xl ) ； 


fisubfdn 


dwy.yl ) ； 


dsubfdn 


®cvf ti ( di 

, \ » O Aa« i 1 J— O \ 、 ■ 

0Bdd(dn 

, 

t2 

twx,yl ) ； 
dwy.xl ) ； 


1 ine(x 


®cvfti(dr 

i>. し 2,ecvfU(dm2>>; 

"'iiiliKili 

,c 

Iwx.yl ) ； 


9sub(dn 
Une(x 

2 

dwy,xl > ； 
®3vf ti (dn 

i).*.2,»cvfti)dm2)); 

mode (3 

0 

； 


circlei 


y,9); 



システム インデックス 


■ 86 年 12 月 号 - 

第 34 部 CASL & COMET 
連載 FuzzyBAS に 料理法く 3〉 

■ 87 年 1 月 号 一 

第 35 部 マシン 語 入力 ツール MACINT0-C 
連載 FuzzyBAS に 料理法く 4> 

■ 87 年 1 月 号 

第 36 部 アドベンチャー ケ一厶 MARMALADE 
第 37 部 テキ アベ 作成 ツール C0NTEX 

■ 87 年 3 月 号 


第 38 部 S 法 使い は アニメが お好き 

第 33 部 アニメーション ツール MAGE 

付 » "SWORD" 再揭 数と MAG にの 標準化 

■ 87 年 4 月 号 


第 40 部 INVADER GAME 
第 41 部 TANGERINE 
■ 87 年 5 月 号 


第 42 部 s-os"swomr 変身 セット 

第 43 部 MZ- 700 用 "SWORD" を QD 対応に 
■ B7 年 S 月 号 


インタ ラフト コンハ イラ: (勿 言 吾 
第 44 部 FuzzyBAS に コンハ イラ 
第 45 部 エティ タ アセンブラ ZEDA-3 
■ B7 年 7 月 号 


第 46 部 STORY MASTER 

■ 87 年 8 月 号 一 

第 47 部 ハズル ゲーム 碁石 拾い 

第 48 部 漢字 出力 ハツ ケージ JACKWRITE 

特別 付録 版 S- 0S"SW0RD" 

■ 87 年 9 月 号- 

第 43 部 リロ ケ一タ ブル 逆 アセンブラ Inside-R 
特別 付録 PC-80(n/8801 版 S-0S"SW0RD" 

■ 87 年 10 月 号 一- 

第 50 部 tiny CORE WARS 
第 51 部 FuzzyBAS に コンパイラの 拡 3ft 
第 52 部 XUurbo 版 S-0S"SW0RD" 
跚 87 年 11 月 号-一 

神話の なかの マイクロ コンビ ュ一タ 
S-0S の 仲間た ち 
もう ひとつの FuzzySAS に 入門 
ファイク レア ロケータ & ロータ' 
フト S-0S こちら 集中治療室 

BACK GAMMON 
12 月 号 


ター トル グラフィック ハツ ケージ TURTLE 
Xlturbo 版' 'SWORD" アフターケア 
ライン ブリン トル一 チン 
特別 付録 PASOPIA7 版 S-OS"SW0RD" 

■ B8 年 1 月 号 一一 

第 58 部 FuzzyBASIC コンパイラ' 奥 村 版 
付錄 石 上 版 コンパイラ 拡張 部の 修正 

■ BB 年 2 月 号 一 


第 59 部 シュ一 ティング ゲーム ELFES 
■ 88 年 3 月 号 —— 


第 60 部 ffl 造型 コンハ イラ 言語 SLANG 
■ 88 年 4 月^ — 


第 61 部 デバッギング ッ一ル TRADE 
第 62 部 シミュ L シ ヨン ウォーゲーム WALRUS 
■ 88 年 5 月 号- 


第 63 部 シュ一 ティング ゲーム ELFES II 
第 64 部 地底 最大の 怍戰 
■ 08 年 6 月兮 


第 65 部 « 造化 言語 SLANG 入鬥 111 

第 66 部 Lisp- 85 用 NAMPA シミュレーション 

■ BB 年 7 月 号 一- 


遠 載 W 造化 言語 SLANG 入門 I2i 
■ 88 年 8 月 号 


第 68 部 マルチ ウィンドウ エディタ WINER 

■ 88 年 9 月 号一 

第 69 部 超 小型 エディタ TED- 750 
第 70 部 アフターケア WINER の 拡張 

■ B8 年 10 月 ^一 

第 71 部 SLANG 用 ファイル 入出力 ライブラリ 
第 72 部 シ ユー ティング ゲーム MANKAI 

■ 88 年 11 月 号- 

第 73 部 シ ユー ティング ゲーム ELFES IV 

■ 88 年 12 月 号 -〜 

第 74 部 ソ一 スジ エネ t タ S0URCERY 

■ 89 年 1 月 号 


第 75 部 ハズル ゲームし AST ONE 
第 76 部 ブロック ケーム FUCK 

■ B9 年 2 月 号 

第 77 部 高 速 エディタ アセンブラ REDA 
特別 付錄 XI 版 S-0S"SW0RD "く 再 掲截〉 

■ 83 年 3 月 号 

第 78 部 Z80 用 浮動小数点 演算/、 ッ ケージ S0I 

■ 89 年 4 月 号- 


第 73 部 SLANG 用 実数 演算 ライブラリ 

■ 83 年 5 月 号 

第 80 部 ソース ジ m ネレ一 夕 RING 
■89 年 6 月 号 

第 81 部 超 小型 コンパイラ 丌 C 
■89 年 7 月 号 

第 82 部 TTC 用 バズ ル ゲーム TK;BAN 
■89 年 8 月 号 一 

第 83 部 CP/M 用 ファイル コンバータ 

■ B9 年 9 月 号 


第 84 部 生物 進化 シ ミ ユレ ーシ ヨン BUGS 

■89 年 10 月 •§ 

第 85 部 小型 イン タブ リタ 首 
■89 年 11 月 号 

第 86 部 TTI 用 ハズル ゲーム PUSH BON! 
■ 83 年 12 月 号 - 

第 B 7 部 SLANG 用 リ ダイ レ クシ ヨン ライブラリ 


■ 90 年 1 月 号 


第 8B 部 SLANG 用 ゲーム WORM KUN 
特別 付錢 再掲敏 SLANG コンハ イラ 
■ 90 年 2 月 号 

第 89 部 超 小型 コンバ イラ TTC++ 
■90 年 3 月^ — 


第 90 部 超 多 機能 アセンブラ OHM-Z80 

■90 年 4 月 号 

第 91 部 フ アジ イコン ビュー タ シミュ L シ ヨン ト MY 
■ 90 年 5 月 号 


第 32 部 イン タフ リタ 言語 STACK 
矚 90 年 6 月 号- 


第 67 部 マルチ ウィンドウ ドラ イノ 


第 93 部 リ ロケータ ブルフ ォ一 マツ 卜の 取り決め 
第 94 部 STACK 用 ゲーム SQUASH ！ 
第 95 部 X68000 対応 S-OS "SWORD" 
特別 付錄 PC- 286 対応 S- OS "SWORD " 

■90 年 7 月 号 

第 96 部 リ ロケータ ブル アセンブラ WZD 

■90 年 8 月 号 

第 97 部 リンカ WLK 


* 以上の ァフリ ケーシ ヨン は. 基本 システム である 
S-OS "MACE" または S-0S"SW0RD" がない と 動作 
しません ので ご; 主 奪く ださい， 
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マシン 語 カクテル in Z80's Bar 

第 15 回- /、ッ シュで チェック - 


シナリオ & イラスト 
特別 監修 
コ ン サルタ ン ト 


山 田 純 二 

金子 俊 一 S 浦 川 博 之 
中 野修ー 


亲碟 開賠胎 多数 


j> カラン， コロ ~ン （ドアの 開く 音） 
源 光 （以下 光） ： こんにちは〜。 

マスター （以下 M) ： や あ， こんにちは 

(ガサ ゴソ ）。 
ようこ （以下 Yo> ： あら どう したの， 光 君。 
こんな 昼間から。 

光 ： Z80's Bar が 新装 開店 したと いうから 
ご 挨拶 申し上げよ う と 思い ま して。 だけど， 
すごい 騒ぎ だな あ。 

Yo ： だって まだ 片付け も 終わって ない し， 

ひ ま なんだ つ た ら光君 も 手伝つ て よ 。 

純 二 (以下 純） ： 24051 ( プチ） 24052 (プチ） 


光： わ あ。 なんだ 純 二君。 そんなと ころに 

いたの 力'。 何 を やって いるんだ， 君 は。 

Yo: 兒 てのと おり， エアー キャップ （通 

称 プチ プチ） を 潰し てるのよ。 

光： こんなに ひま な 奴が い る ん だつ た ら ， 

手伝わせれば いいのに。 

Yo: それが ね， プチ プチ を 見つけてから 

ずう 一つと， あれに かかりつ きりで 離れな 

いのよ。 

M ： 光 君， ちょっと こっちで 探し 物 を 手伝 
つて もらえる 力' い。 

光： はいはい， 何 を 探して るんで す 力'。 
M ： ^が 溜めて い る ッケの 明細書。 
光： あ， 急用が できた ので， いずれまた。 
Yo ： うそ だってば， 光 君。 前に 来たお 客 
さんの プログラムが， どこかへ 行って しま 
つたみたい なのよ。 

光： なんだ， びっくり させないで ください 
よ 。 だけ ど， プロ グラ ム ぐらい， 店の コン 
ピュー タ にで も ぶちこんで 管理 すれば いい 
のに。 

M ： そんな プログラムが あったら， とつく 
にそう してい ますよ。 



ソフ 卜/ 《 ンクの 社屋 移転に 伴い かどろ か は 知り ません ガ， Z80's 
已 ar も 新装 開店 だそう です。 とはいえ， 別に 内容に 変わりが ある 
わけで もな <, いつも どおりに 話 は 進む のでした。 ちなみに 今月 は 
八 ッシュ 法と かい ラ もの を 使った データの 検索のお 勉強です。 


光 ： そんな いいかげんな 経営で よ く 溃れな 

いな あ。 ここ は Z80's Bar でしよ。 プロ グ 

ラムなん て 適当に ッケの 溜まって いる 客に 

作らせち やったら どうです。 

M: そうかそう 力'。 そうすると 光 君が プロ 

グラム を 作って く れ るんだ ね。 

光： へ？ 

Yo ： さっす 力 5 , 光 君。 がんばつ てね。 
光： ちょっと 待って。 なんで そっちの ほう 
に 話が 飛 ぶんです か。 

M ： やっぱり いいだしっぺが やる というの 
は 民主主義の 大 原則 （？） であるから。 
光 ： そんな あ。 

Yo ： あたしから も お願いす る 力 'ら。 は い, 
ホ ワイ ト チョコレート ソーダ あげる。 
光： しょうがな いな あ， ようこ さんの 頼み 
と あっち や あ。 

純： 24111， この 女ったら し （プチ）。 
光： やかましい！ 


探し 物見つ けます 


光： ところで マスター， どんな ものが いい 

んで すか？ 

M ： とりあえず， デ一タ の 検索 ルーチン か 

なんか。 

光： 検索ね え。 ここの プログラムの 量から 
すると， ハッシュ 法 を 使った ほうがよ さそ 
うだな あ。 . 
Yo: ねえね え， データのチェックって 最 
初の ほ う から 順番に 調べて い けばい いん 


図 1 


. データ 1 格納 ァ ドレス 


0000„ 


0800 „ 


. データ 2 格納 ァ ドレス 
1 /、ッ シュテ 一 ブ J レ 


データ 


デ一タ 2 


データ 格納 エリア 


じ やない の？ 

光： 基本的に はね。 100 件ぐ らいの データ 

なら 頭から 「これ じ やない， これで もない」 
とやって いけば いいけ ど， データの 量が 増 
える と 最後の ほうに ある デー タ を 検索 し た 
いとき にす ごく 時間が かかつ ちゃう。 そこ 
で ハッシュ 法 を 使 うんだ。 

Vo ： ふ〜 ん。 

光 ： ハッシュ 法で は データが どこに 格納 さ 
れ ている か を 示す ハッシュ テーブル を 用意 
する ことによって， 検索の 効率 を 上げる こ 
と がで き るんだ よ。 たとえ ば， Oh!X の 目 
次から Z80's Bar を 探す とする。 目次 を 順 
番に 「Z80's， Z80's …… 」 と 探す の は 記事 
が 多い 本に なれば なるほど 大変で しょ ？ 
Yo ： うん。 

光： ハツ シ ュ 法つ て の は， た と え ば Z80's 
Bar に 1 番 なら 1 番と 番号 を 振って， 探し 
たい と き に 作って おいた 表の 1 番の ところ 
を 見れば r 何 ページ （にある よ）」 と 書い 
て あるよう な 方式 だと 思って。 
Yo: あ 一， なるほど。 その ページ 一 II 表 
みたい なのが ハッシュ テーブル なのね。 で 
も， それ はどう やって 作る の？ 
光： まず， データ を 登録す ると きに ハツ シ 
ュ 関数と いう ものに データ を 通して， ハツ 
シュ値 を 求める。 次に， ハッシュ テーブル 
の 中の ハッシュ 値の^ ^定 したと ころに， デ 
ータが ある ァ ドレス を 登録して や るんだ 

(図 1 参照）。 
M: でも 光 君， もしも 違う データが 同じ ハ 

図 2 
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データ 


データ 2 


デ一 タ 2 の アドレス 


152 Oh! X 1990.9. 


ッ シ ュ値を 示 し た ら どうす る ん です。 場所 

が ダブ ッた らまず いでし よ。 

光： そういう 場合に おける 処理 方法の 違い 

によって ォーフ 。ン ハッシュ， チェーン ハツ 
シュ という 2 つの 方法に 分けられます。 
Yo ： それって， どこ 力 5 ' ど う 違う の。 
光 ： オープン ハツ シュの ほう は 強制的に 次 
の テーブル アドレス を その デー タの ハツ シ 
ュ値 としてし まう んだ。 
M ： つまり， ある デー タの ハツ シ ュ値は 00 
00 H なんだ け ど， そ こ に はすで にァ ド レ ス 
が 登録済み だつ た 場合に は， 次の 0002 H を 
データの ハ ッシュ 値 としてし まう んで すね。 
光： そのと おり。 0002 H が だめ だつ たら， 
その 次の 0004 H と いった 具合に， 空きが 見 
つかる まで 探して い く んで すよ。 
Yo ： じゃあ， チェーン ハッシュの ほう は？ 
光 ： チヱ一 ン ハッシュの ほう はすで に 登録 
さ れた データの 後ろに ど ん ど ん槃げ て い く 
んだ。 登録す る デー タ に はデー タ 同士の 紫 
がり を 示す 2 バイ トの ポインタ を 付加して 
やる 必要が あるけ どね。 
Yo ： どういう こと？ 

光： 具体的に いう と， まず ハッシュ ィ直 (00 
00 H ) に デー タ 1 の アドレス （1000 H ) が 登 
録 されて いると する。 そ こに， ハッシュ 値が 
同じで ある データ 2 が 出 てきた ときには， 
1. OOOOh のァ ドレス を 見に い く 。 
2. すでに， 1000h の アドレスが あるか 
ら データ 1 を 見に い く 。 

3 . 次に 続いて い る データ はない ので ポ 
ィ ンタに データ 2 の アドレス をセッ ト して 
登録が 終了す る。 

という 具合に 処理 をして いくんです （図 2 
参照)。 

Yo ： という こと は， さらに 同じ ハッシュ 
値の デ一 タ 3 が 出 てきた ときには， デー タ 

2 のポィ ンタに データ 3 のァ ドレス をセッ 

ト してやれば いいのね。 
光： そういう こと。 

純： 25891 (プチ）。 データが データに どん 
どん ぶら下が つてい く わけ だね。 

見つかる かな 7 

光： さて， 今度 は データ 検索に ついて 説明 
していき ましょう。 といっても， データの 
登録の 様子 を 説明 してき た 時点で ある 程度 
は 想像が ついた だろう けど。 まず は， ォー 
プン ハッシュ。 手順と して は， 

1. ハッシュ 値 を 求める。 

2. ハッシュ テーブルに 格納され ている 
ァ ドレス を 取り出す。 

3. もしも アドレスが 登録され ていな け 


れば， 探そうと している データ は 存在 し な 
いから エラー を 表示して メ イン ルーチンに 

戻る。 

4 . 取り 出 し た ァ ド レスの データと 検索 
したい データ を 比べて い く 。 

5. あっていたら データ を 取り出して， 
メ ィ ン ルーチンに 戻る。 

6. 違って いたら ハッシュ 値 を ひとつず 
らして 2 から 繰り返す。 

という ふうに してい く。 
Yo ： チェーン ハッシュの 場合 は ？ 
光 ： これ も だいたい 似た よ う な 感じで， 
1-5. オープン ハッシュと 同じ 処理。 

6. 逸って いたら ポインタの アドレス を 
取り出す。 

7. 次の データが 存在し なかったら 探 そ 
う と している データ は 存在 し ない ので， ェ 
ラー を 表示して メ ィ ン ルーチンに 戻る。 

8. 次の データの アドレス を セットして, 
4 から 操り 返す。 

という ふうに する んだ。 
Yo ： どっちの ほうが 効率が いいの かな。 
光： よう こちゃん は， どっち だと 思う。 
Yo: やっぱり， 処理の 少ない オープン 
ハッシュの ほう だと 思う。 
光： マスタ一 は？ 

M ： 私 も， よう こさんと 同じ …… に， し よ 
うかと 思つ た けれど， 芸が ない ので チェ 一 
ンハ ッシュ にしましょう。 
純： 30302 (プチ）， 僕 はよう こさんと 同じ 


だよ。 

光 ： 誰も h 様に は閗 いてお らん。 それに マ 

スター， クイズ じ やな いんです から， わざ 

わざ 違う 答えに する こ と はないで し よ う。 

M ： いい じ やない の。 

Yo ： で， 光 君。 正解 は どっち なの。 

光 ： 僕 は チェーン ハッシュの ほう だと 思つ 

ている んだ。 

M ： 我々 が 納得で き る 现由 を 述べよ。 
光： それ はです ね ■： オープン ハッシュの 場 
合 ハッシュ テーブルが いっぱい になって く 
る につれ て 登録， そ して 検索に 時 問 がか か 
つてし まう からです よ。 極端に い うと， 10 
24 個の テーブルが 用: S されて いるけ ど， 最 
後の 1 個 し か テーブルの 空 き がな く て ， お 
後に 登録 しょうと し たデー タ のハ ッ シ ユ^ 
が 空 きの 1 つ 後ろ だつ た 場合 を 考えて みて 
ご ら ん。 

Yo ： 1 つ 前 に 戻れば 問題 ない けど 戻る こ 
と はでき ないから， 結局 1023IH] も チェック 
していかなければ ならな いんだ。 
光： そのと おり。 チェーン ハッシュなら， 
いく ら なんでも 1000 個 も の デー タ が迚 な つ 
ている こと はまず ない といって いいから ね。 
それに 登録で き る データの 数 も オープン ハ 
ッ シュ では ハツ シュテ 一ブルの 大きさに 限 
定 されて しまう けど， チェーン ハッシュで 
はそう いう こ とがない。 枘 f'j: しま した ？ 
Yo&M ： 納得し ました。 
純 ： 30374 (プチ）， うん うん。 


プログラムの 解説 


コロ コロコ 口〜》 （電話が 鳴る 音） 
純 ： はい， 山 田です。 

光： あつ， 山 田 君？ 光 だけど， 今月 ひまして 
る ？ 

純 ： 一応， ひまです けど。 

光： それじゃ あ， 今月の プログラム， 君が 作つ 
て くれない？ いま 試験 中で 忙し く つて。 


？ 


じゃあ， よろしくね （ガ チャン）。 
お一 い， ひかる く ん や〜 い。 
電話 ： ッ一 ッ一 …… 。 

という わけで， 身勝手な 光 君に 代わって， 
作った プログラムの 解説 をして いきます。 

• HASHSEARCH 

入力 DE レジスタ …… ラベル ネーム を 格納 
して ある ァ ドレス 

出力 HL レジスタ データ 

ハツ シュテ 一ブルから データ を 取り 出す サブ 
ル一 チンです。 

• HASHSET 

入力 DE レジスタ …… ラベル ネ一厶 を 格納 
して ある ァ ドレス 

(INPDAT) データ 

出力 なし 


ハツ シュテ 一ブルに ラベル を 登録す る サブ 
ル一 チン。 まず ハッシュ 値 を 求めてから， すで 
に 登録して あるか 判定して， 登録して あったら 
CHAIN に 飛んで います。 CHAIN では ラベルの 二 
重 定義 チ i ック をして いると ころに 注目。 定義 
できる ラベル は 英数字の みです。 
- HASH 

入力 DE レジスタ ラベル ネーム の 格納 

アドレス 

出力 HL レジス 夕 ハッシュ 储 

ラベルの ハッシュ 値 を 計算す る サブルーチン。 
二の ルーチン は REDA の もの を その ま ま 流用 し 
てます。 計算 方法 は 文字 ごとに 値 を 5 倍して 
キャラクタ コード を 加えて， さらに 2 倍して い 
く。 これ を 文字列が 終わる まで 繰り返して いま 
す。 

• SEARCH 

入力 HL レジスタ ハ ッ シ ュ テーブル 上 

の ラベル データ 格納 ァ ドレス 

出力 Cy=l —致して いない 

Cy=0 —致して いる 

ハッシュ テーブル にある ラベル ネームと， 登 
録 しょうと している ラベル ネームが一 致して い 
るか 調べます。 
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どこに 使 うんだ 


Yo ： ところで， ハッシュ 法の 原理 はわ か 
つたけ ど， 実際 どんなと ころで この ハツ シ 
ュ 法が 使われて いるの。 
光： 身近な ところで， アセンブラ や コンパ 
ィ ラの ラベル チェ ック なんかに 使われて い 
るよ „ 

Yo ： どんな ふう に ？ 

光 ： アセンブラの REDA では， 1 パス 目に 
文法 チェ ックと ラベル テーブルの 作成 を や 
つてい るんだ。 その ラベル テーブルの 作成 
に オープン ハッシュ 法が 使われて いて， 2 
パス 目に ラベルが 使われて いる 命令のと き 
に， この ハッシュ テーブル を 参照して アド 
レス を セットして いきながら， オブジェ ク 
トを 作成して いくんだ。 そこで， ァ セン ブ 
ラ （REDA) では 2 パス あるけ ど， コンパ 
イラに は 1 パスで オブジェ ク トを 作成して 
しまう ものが ある （SLANG など）。 これ は 
どうやって いるの かわかる かな？ 
Yo&M: は一 い 光 君， わかり ませ 一ん。 
光： はいはい， 単純 明快な 答え を どうも あ 
り 力 ？ とう。 んで， こ の 場合 はセ ッ 卜する ァ 
卜" レス を チェーンさせる こ とに よって ラベ 
ル に 対応す る アドレス をセッ ト してい くん 
です よ。 これ も 具体的に 説明して いきまし 
よう。 登録す る ラベル データ は 図 3 のよう 
な 構成 を とっている としょう。 たとえば， 

り ス卜 1 


#HAJIME 

LD A, 10 
DEC A 

JP NZJHAJIME 
と いう プログラム では ラベル （#HAJIME) 
が あら. かじめ 登録され ている ので， JP 命 
令が きた と き に は ハッシュ テーブル を 参照 
すれば 素直に #HAJIME のァ ドレスが 取 
り 出せ る のです が， 次の よ う な プロ グラ ム 
のとき にはちよ つと B つたこと になる んだ。 
CD DO IF #HAJ 匿 CALL #GETKEY 
FE 05 CP "5" 

CA *1 *1 JP ZJJMP 

05 DEC B 

CA *2 *2 JP ZJJMP 

JR #HAJIME 

#JMP 

#GETKEY は あらかじめ 登録され てい 
ると して， IIU 題 は ラベル （#JMP) を 登録す 
る 前に JP 命令で #JMP が 使われて い る こ 
と。 ラベルが 現れた， という ことで コ ンパ 
ィ ラは ハッシュ テーブルに ラベル （#JMP) 
を 探しに 行く わけです 力 s , 当然の ことなが 
ら ラベル は 見つからない。 そこで， とりあ 
えず #JMP は 未定義の フラグ を 立てて， ラ 
ベル アドレス をセッ 卜する ところに は *1 
の アドレス を セットして 登録し ます。 この 
とき， * 1 の アドレスに はとり あえ ず OOOOh 
を セットして おく。 

次に 5 行 目に も #JMP が 使われて い る け 
ど， この ときには 一応 テーブルに 存在して 
いる 力;， まだ アドレス は 確定して いない。 
この ときには *1 の アドレスに *2 のァ ドレ 
ス をセッ ト， *2 のァ ドレスに は OOOOh をセ 
ット してお く。 そして， 7 行 目に してやつ 
とこ さ #JMP がで てく るので， コンパイラ 
は ハッシュ テーブルに ラベル を 定義し にい 
くんだ な。 そいで コンパイラ はこ こで #J 
MP は 未定義 だ， という こ と を 発見して *1， 
*2 と #JMP のァ ドレス をセッ 卜 して まわ 
り， 未定義の フラグ を 消して アドレス もセ 
ット して， めでた し めでた し， となる んだ。 
Yo&M ： パチパチ〜。 

光： はあはあ。 一気に 説明したら 息が 切れ 


図 3 


0oeo 
eeeB 
eoea 

0000 
1FE8 P 


0000 
eeae 

AO00 
A000 


： Zail'Bar CHAIN HASH SEARCH 

； 1990.7.8 J.VAMADA 

• MSG EQf S 1 FE8 
*MSX じ S1FE5 

• PEEK EQl' J1F94 
•POKE E9U s 1 F9A 
t POKES EW S1F97 


； HASH TABLE KARA DATA VO OE 
； in DE=LABEL NAME ADRE3S 


A800 

aooo 

AO00 
A003 
A006 
AS09 
A8BA 
A0OB 

ABOF 


次の ラベル データの ボイ ン 

[p |_ ラベル ネーム 

_ V アドレス データ 

'定義 状態の フラグ 


ちゃった けど， わかって くれました？ 

Yo&M ： ニコニコ 二 コ …… 。 
光 ： だめ だ こ り や。 


9 


さあって 来月 は 7 


M ： 光 君， どうも ごくろうさま。 あと はプ 

ログ ラムの 作成 だけ だね。 

光： はいはい， まかして おいてく ださいよ。 

力 カラン， コロ 〜ン （ ドアの 開 く 音） 

老 &善& で： こんにちは〜。 

Yo: あら， みんなお そろいで どうしち や 

つたの。 

で： ひま だつ た も ので。 
善： そういう こと。 あつ 山 田 君， 面 |'1 いこ 
とやって るね， 僕に もやら せて よ。 
純 ： 40001 (プチ）， いいよ。 
純 &善： 40002 (プチ）， 40003 (プチ） … 

老： やれやれ， まだまだ 子供 じ やのう。 ん, 
光 君 はずい ぶん と 疲れて いるよ う じ やの。 
光 ： はい。 

M ： きょう はずい ぶん と こ き 使って しまい 
ま したから ね。 

Yo ： 光 君， さっき あげた ホ ワイ ト チョコ レ 

一 卜 ソ ーダ まだ 飲んで ない じ や ない。 

光： そういえば そうだね。 それじゃ あみん 

な も 一緒に 乾杯し ま しょう。 

M ： そう です ね。 今日 は 私のお ご り で。 

で： さっすが マスター。 ほら， 山 田 君 も 西 

川 君 も こっちに きな よ。 

純&善 ： は 〜い。 

M: それじゃ あ， 引っ越しの 片付け は みん 
なで やる として， とりあえず かんぱ〜 い。 
一同 ： かんぱ〜 い。 ご く ご く '…- うつ。 
純： 鼻から 血が でて， はなち 'ぶ〜。 

つづ く 

； out HL=DATA 

HASHSEARCH 

CAL し HASH 

CALL HASHCL'T 

CALL *PEEK 

LD C,A 

INC HL 

CALL *PEEK 


JP Z , ERROR1 


CALL SEARCH 


； UNDEFINED ERROR 


154 Oh! X 1990.9. 


.■ 


A01 8 30 1 3 

3 „ JR 

Mr 1 C TMT\ 



AOBF 

144 

: out HL = HASH , ；、 -LENGTH 

A0 CD 94 IF 

J 4 し ALLi 

f " - W 




14 5 








146 

HASH 

A01E CA 1 3 Al 

3g jp 

2 , ERROR1 



A O 1 CKPi Of 
.H v o C 1 v U \J 1 


L LJ l\ L. T VI い V】 V7 

A021 23 

37 INC 




a or* o no 

A W し £ U 3 



A022 CD 94 IF 

38 CALL 

#PEEK 





1 n U I CTUT に 

A025 4F 

39 lo 





1 50 


A026 23 

40 ikjc 

HL 






A027 CD 94 IF 

4 1 CALL 

#PEEK 



a ant t\Q 


EX AF | AF 

A02A 4 7 

42 LD 

g A 



AU し O 3 1 

； ^ 

S 

A02B 18 E6 

43 jr 

SEA2 






A02D 

44 FIND 




M りし 3 U O 

j g g 


A02D 23 

45 mc 

HL 



A ftp fl j--n CQ A c 
f\vK^t\ し U H a f\， 


し r\L し l_d C J I- Fl C. L |\ 

A02E 23 


HL 



AuU i> O o j 'I 



A02F 23 

47 INC 

HL 




* 'z 


A030 CD 94 IF 

4 g [； ALL 

#PEEK 



AOL r Lty 



A033 5F 

4 g 

g A 





f ミ x 

A034 23 

50 IMC? 

HL 



a on 1 9 i 



A035 CD 94 IF 

5 i CALL 

ttPEEK 



a o n ゥ riQ 

1 " 


A038 67 

52 し D 

H , A 




2 g 3 


A039 6B 

53 tD 

L, E 




jg4 

- に <|t •'、 , D c - 

A03A C9 

54 RET 




4 ^ 

155 

LD Q }\ 

A03B 

55 




A0D5 29 

lgg 

ADD HL HL 

A03B 

56 ； HASU SIZE 




A0D6 29 

167 

ADD h L t H I. 

A03B 

57 




A0D"7 09 

1 

ADD HL, RC 

A03B 

58 HASHCUT 




v\0D8 4 F 

1 gg 

LD c A 

A03B 7C 

59 W . 

A,H 

； HASH SIZE $07FF 


A0D9 0 6 00 

1 70 


A03C E6 07 

60 AND 

S07 



A0DB 09 

171 

ADD KL.BC 

A03E 67 

61 LD 

H,A 



A0DC 29 

172 

ADD HL.HL 

AQ3F C9 

62 RET 




nvUW i 。 



A040 

63 





17^ 

£Y i p AC • 


64 ； HASH TABLE N 

I TOUROKU 



/\0DF 3C 

j y g 



65 ； in DE = LABEL NAMI- ADRFSS 


A0£0 2 0 E 7 

j yg 

jp iij 7 HASH 2 

A040 

66 







A040 

67 HASHSET 






KASHRET 

A04 0 CD BF A0 
A04 3 08 

68 CALL 

6.9 EX 

HASH 




179 

BV\ 

A04 4 3C 

70 INC 

AF , AF ' 
A 



/^QE6 77 

1 80 
j g i 

LD A , SOD 
LD ( hl ) ， A 

A045 08 

7 1 EX 

AF , AF ' 



A0£"7 09 

132 


A046 CD 3B A0 

72 CALL 

HASHCL'T 



\QES C9 

183 

HEX 

A04g CD 94 IF 

7 3 CA しし 

*PEEK 



A0E9 

j 34 


A04C 4F 

7 4 LD 

A 




185 

LETCHECK 

A04D 23 

75 IMC 

HL 



A0E9 1 A 

186 

LD A , ( DF ) 

A04E CD 94 IF 

76 CALL 

fPEEK 



AQEA FE 30 

187 

cp ,- 8" 

A05 1 47 

77 L& 

B,A 



A0EC D8 

188 

RET C 

A052 Bl 

翁 OR 

c 



A0ED FE 3 A 

189 

CP " g " + i 

A053 20 3B 

79 JR 

N2 , CHAIN 

： SUDENI TOUROKUZUM1 


/\0gF" 3F 

190 


^055 

80 




i\0P0 D0 

191 

RET MC" 

A055 2B 

81 DEC 

HL 



; \0P 1 pe 4 ] 

192 

CP "A " 

A056 ED 5B 49 

Al 82 LD 

DE， (MSTRP) 



a op 3 ng 

j g q 


7 B 

83 LD 

^,E 



ftU P 4 r H «J D 



CD 9A 1 F 

84 CALL 

#POKE 




195 



85 ISC 

HL 



A0F7 C。 



A R £； p 7 A 

86 LD 

A.,D 




197 


A w o v し iJ 1 r 

87 CALL 

tfPOKE 




2 9g 

•STRING SfARCH 


88 HSS3 





1 99 

in HL-IMTA TOP 

AW 1 97 

89 SUB 





200 


\QQ^ 32 4B A 1 

90 LD 

1 STRD\TA 1 , A 



A0F8 

20 i 

SEARCH 

A067 21 00 00 

91 し D 

H し, 0000 



AQFB E5 

202 

Pl/SH H し 

A06A 22 4C Al 

92 し D 

1 STRDATA-1 1 

,HL 


A0F9 01 05 0C 

203 

LD BC , 0005 

A06D 2A 47 Al 

93 LD 

HL, ( INPDAT) 



A0FC 09 

204 

ADD HL , DC 

A070 22 4E Al 

94 し！） 

(STRDATA+3 > 

,H し 


A0FD 11 50 A 

205 

LD DE, STRING 

A073 

95 




A100 

206 

SCH2 

A07 3 01 05 qq 

96 LD 

BC, 00(15 

； DATA SIZE 


六 100 CD 94 1 ！ 


CALL #PEEK 


97 EX 

AF , AF ' 



Al 03 47 

208 

し D B , A 

^077 8i 

98 ADD 





209 

LD A , ( DE ) 

^07g 4 p 

99 LD 




^ j 05 gg 


CP B 

^07g 30 0 i 

100 JR 

SC.HSS2 



06 20 08 

21 1 

JR NZ , NO ! 


101 INC 

B 




212 

CP SOD 


102 HSS2 




A 1 0A 28 0i5 

213 


2 1 4 B Al 

193 LD 

HL.STRDATA 




214 


^07 p gD 49 

Al 104 LD 

DE, {MSTRP) 



A10C 23 

215 

INC ト: し 

C5 

105 PUSH 

BC 



A10D 13 

216 

INC DE 

D5 

106 PUSH 

DE 



A10E 18 F0 

217 

JR SCH2 

^095 cd 97 i p 

167 CALL 

#POKE® 



A110 

218 

NO! 

AO 8 8 E 1 

108 POP 

HL 



AUG 37 


SCF 

A089 CI 

109 POP 

BC 




220 

OK 


110 ADD 

HL.BC 



Alll El 

221 

POP HL 

^ggg 22 A ° Al 

1 1 1 LD 

(MSTRP) ,HL 



A112 C9 

222 

RET 

B7 

1 12 OR 



AU3 

223 



113 RET 



A113 

224 

； ERROR 





A113 

225 



115 CHAIN 





ERROR 1 

AW j v u v 

116 LD 

H ,B 


AU3 11 34 A 


し!） DE .NOTERRM 

<h nq i c q 

1 1 7 ID 



A116 18 03 

228 

JR ER2 

i\W ^ し U r o rt V 

118 CALL 

SEARCH 


A118 


TWOERR 

floy D U ビ i o A J 

119 JP 

NCTWOERR 

;TWO STRINGS ERROR 

AU8 11 20 A 


LD DE.TWOERRM 

A/XQQ r*r\ O A 1 C 

Aoy o し u y i i r 

120 CALL 

*PEEK 


A11B 


ERZ 


121 OR 



AUB CD E5 1 

, ~, ^ 

CALL #MSX 

A09C 28 0C 

122 JR 

Z .CHAIN2 


AUE 37 

233 

SCF 

A09E 23 

1 23 INC 

HL 


A11F C9 

234 

RET 

A09F CD 94 IF 

12-4 CALL 

itpEEK 


A1Z0 

235 


AE1A2 23 

125 INC 

HL 


A120 54 57 4 

， 20 236 

TWOERRM DM "TWO STRING ERROR 

A0A3 4F 

126 し D 




A124 53 54 5 

！ 49 


A0A4 CD 94 IF 

1 27 CALL 

• PEEK 



A128 4E 47 2 

) 45 


A0A7 47 

128 LD 




A12C 52 52 4 

- 52 


A0A8 18 E6 

129 JR 

CHAIN 



A130 21 21 




CHAINS 

L *P0KE 

HL 

DE , ( MSTRP) 

A,E ； MEXT POINTER SET 

L fcPOKE 


L #P0KE 
HSS3 


42 ； CA しし' CULATE HASH 

： in DE 二 STRING A DRESS 
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A132 0D 00 237 
A134 55 4E 44 49 238 
A136 46 49 4E 45 
A13C 44 20 45 52 
A140 52 4F 52 21 


A144 21 

A145 0D 00 239 

A147 00 00 240 

A149 00 08 241 

A14B 00 242 

A14C 00 00 243 

A14E 00 00 244 

A150 245 

A1A0 246 


"UMDIFINED i-'RH'OK ' 


3000 
S0SOO 


3000 
9000 


INPUT DATA 

STRING SET POINTER 

FLAG 

NEXT POINTER 
DATA 

STRING BAFA 


INPDAT 

MSTRP 

STRDATA 


A A^BEF34789CFFF 

AAAAABBB8BBBBB 

AAA4-AAAAAAAAAA 



B w w B w w s 

D D D n n n n 


PC-E500 テーブルトーク RPG サポート システム (2) 

マスター 戦闘支援 ツール CST 

ボケ コンを 使って テーブルトーク RPG を 楽 し むた めの 秘密 
Matsui Shin 兵器。 いよいよ 今回 は その プログラム を 掲載し， その 使われ 方 

ね# \= を ゲーム 進行に 即して 実践的に ご 紹介し ましょう。 その 名 も 

マスタ一 戦闘支援 ツール CST。 どうです カツ コ イイで しょ う。 


まず， プログラム リス 卜 を 見て ください。 
こ れが PC- E500(PC_1480U/1490U) 用， 
マ スター 戦闕 支援 ツール CST (Combat 
Support Tool) で" 1 o 

前回， テーブルトーク RPG に は 「マス 
タ 一が 大変で あ る」 という 欠点が あ ると 述 
ベました。 AD&D および D&D は， 数 ある 
テーブル ト一ク RPG のなかで も かな り 戦 
闞がス ピー デ ィ な ほ う です 力、 そ れで も 結 
m めん どい こと もあります。 

たとえば， D&D に は トロール という や 
つがい ます。 これ はもと もと は 北欧の 妖精 
で， ム 一ミンの ようない いやつ もい るので 
すが， D&D の は 指輪 物語に,' I', てく る 悪い 
やって' す。 この モンスター は， リ ジ エネ レー 
ト （時 119 の 経過と と もに ダメージが 回復す 
る） し， ま た 炎に よる ダメージ は リ ジ エネ レ 
一 ト し な t 、ので 別 につけて おく 必要が あ り ， 
さらに 両手と 口で 3 回 攻撃す るな ど， マス 
ターに 負担 を 強いる モンスター なのです。 

という わけで， 戦闘の 手順のう ち， 自動 
化で きる ところ は 自動 化して しまおう， ど 
うで もい い 雑魚 は コンピュータに やらせよ 
う， というの が 戦 11 支援 ツール CST の考 
え 方です。 この プログラム は AD&D(2nd 
edition ) III な のです が' D&D への 移植 は 
簡単に でき るので ご' お 心 を。 

| キャラクターの 属性 

とりあえず， AD&D (および D&D) を や 
つたこと のない 人の ために， 戦闘の ルール 
を 軽く 説明して おき ます。 

まず， すべての キャラクター および モン 
スターに は， AC (アーマー クラス c 小さい 
ほど 敵の 攻繫が 当たりに くい）， HP (ヒッ 
ト ポイント。 体力 を 表す。 0 になる と 死ぬ）， 
THAC0(AC0 の 相手に 20 面の サイ コ 口の 

でい く つ 以上で 当たる 力'。 小さい ほど 攻 
繫 がよ く 当たる）， #AT (攻撃 回数)， dama 
ge (攻撃が さ' I たったと きに 敵に 与 える ダメ 
ージ， 普通 「3d6 + 4」 などと 害く。 ちなみに 


こ れは， 3 個の 6 面 サイコロ の 合計 + 4 t 
い う 意味） な ど の厲 性が 設定され て い ま す。 
ほ 力' に， 魔法な どの 属性 もあります。 

また， これらの 数値 は， キャラクターの 
レベル や モンスターの HD (ヒット タ' イス 
という。 モンスターの 強さ を 表す）， およ 
び 待って いる アイ テムな どに よ り 決定され 
ます。 詳しく は AD&D または D&D の マ 
ニュ アル を 見て く ださい。 

| 戦闘 シー ゲン ス 

実際の 戦闘 例 を 見て みま しょう。 

アリーナ （レベル 7 ファイター， AC0，H 
P35, THAC013, #AT2, damageld8+2) 

ブライ （レベル 6 魔法使い， AC6, HP25, 
THAC019, #AT1, damageld6) 
の 2 人が 洞窟に はいると， 4 匹の オーガ 

Ogre(AC5, HD4+l，HP4d8+l( 平均 19)， 
#ATl,damageldlO) 
それに， 2 匹の トロール 

Troll(AC3，HD6+6,HP6d8+6( 平均 3 
3 >,#AT3， damage ld4+4, Id4+4,2d6, 戦 
闘 開始 後 3 ランド 目から 1 ラウ ン ド 3HP 
の リ ジヱネ レー ト） 

が 現れた。 まだ 距離が ある ！ ブライの 呪 
文が 響く。 「ファイア 一 ボール ！ 」 洞窟に 
爆発の 炎が 広がった。 

ここで， ブライ を やって いる プレイヤ一 
はフ アイ ァー ボールの ダメージ を 決定し ま 
す。 という わけで， 彼 は 6 面 を 6 個 振り， 
23 を 出し ま した。 

すかさず マスター は オーガと ト ロールの 
魔法 回避の チヱ ック （Saving Throw と い 
う） をし ます。 20 面 を 振って， ある 数字 以上 
ならば ダメージが 半分になります。 そして， 
ダメージ を 現在の HP から 引く わけです。 

ファイア一 ボールに 生き残った トロール 
が 2 人に 向かって く る。 

マスターと プレイ ヤー は サイ コ 口によ つ 
て イニシアチブ を 取り合い， どちらから 先 
に 攻撃す るか 決定し ます。 （コ ロコ 口）， プ 



レイヤーが 先手 を り ま した。 

ァ リ ーナ の攻擎 ！ 必殺の 剣が ト ロール 
に 向かう。 

アリーナの プレイヤ 一は， 20 面 を 振って 
当たる かどう か を决定 します。 当たり！ 
2 回目の 攻撃 は …… 当たり ！ ダメージ を 
計算し， マスターに 向かって 「トロール A 
に 15 ダメージ！」 などと いい， マスター は 
ト ロール A の HP から^?" メージ を 引き ます。 

そして， トロールの 反撃！ 

マスター はや はり 20 面 を 振り， 当たった 
かどう か を 計算し ます。 トロールの 場合， 
3 回 攻撃す る わけです。 当たったら ダメー 
ジを 計算し ます。 そして 「アリーナに 6 ダ 
メー ジ！」 などと いい， 次に トロール B の 
攻^ をし ます。 

そして， すべて 終わったら 次の ラウンド 
です。 

| CST の 使い方 

最初 は 面倒臭い ものです が， やがて ルー 
ルは 体に 吸収され， ほとんど 機械的に こな 
せる ようになる ものです。 とはいう ものの, 
マスター はすべ ての モンスター を劻 かす わ 
けです から 大変な の は 大変です。 では ここ 

で CST を 使 うと どうなる でしよう 力'。 

まず， CST を 起動す ると ファイル 名 を 
|ifl いてき ますが と り あえず 無視して リ ター 
ン キー を 押してく ださい。 すると， メイン 
画面に な り ます。 

GROUP0 
GROUP1 
GROUP2 
S,A,R,0-2,Q>_ 

4 行 目に カーソルが ある はずです。 この 
行 を コマンド ライ ン と 呼びます。 
* モンスターの セッ ト 

まず， 

SO (ret) (ret) は リターン キ一 

と 入力して ください。 これ は グループ 0 に 
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データ を セット するとい う 意味です。 する 
とまず， 

N = 一 

と 聞いて くるので， モンスターの 数 を 人力 
します。 とりあえず， オーガ 4 匹な ので， 

N = 4(ret) 
とすると， 次に， 

HP=(/ret)_ 
と閒 いてきます。 HP が 決まって いる 場合 
は それ を 入力し ます。 ここで は HP は HD 
から 自動 計算させる ことに して， （ret) と し 
ます。 すると， 

HD/LV = ? 
と 表示され るので， オーガの HD である， 4 
+ 1 (ret), を 入力し ます。 ここで， 敵が 
モンスター でな く 人間の 場合 は， F(fight 
er) , し (cleric), r(thief) ,M(magic user) 
の アルファべ ッ ト に 続けて レベル を 入力 し 
ま す。 「ex. F5(ret)j。 
ま た， 決まつ た HP を 入力 したと き は， 

HD/LV=(ret) 
と 表示され るので， もし その モンスター 力 ？ 
攻撃 を しないと き （つまり， 後述の HPca 
lc だけ を 使いたい 場合） は， (ret) とすれば 
これ 以降 を パス します。 
次に， 攻撃の データ を 聞いて きます。 

#at = _ 

才 一 ガ は 1 回 しか 攻撃し ない ので， 1 ( re 
t) と 答えます。 そして， 

dmgl (/N)=? 
に 対し， オーガの ダメージ ldlO を， 

dmg 1 (/N)=l*10 
(ndm+p は， n*m+p と 書く）， または， 

dmg 1 (/N)=l— 10 
と 入力して ください （1 から 10 と いう 意味）。 
複数 攻撃す る 場合， 間違えたら， N, を 押 
すと ひとつ 前に 戻り ます。 最後に， 

TH adj = _ 
と 出て きます 力 f , オーガに は 当たり やす さ 
(To Hit) の 修正 はない ので， （ret) としま 
す。 すると， それぞれの HP や THAC0 が 
自動的に 計算され， 画面 は， 

GROUP0 A13 B17C23D23 

GROUP1 

GROUP2 

S,A,R,0-2,Q>_ 

な ど と な る はずです。 A~D の アルファべ 
ッ トは グループ 内での モンスターの 識別 記 
号で， そのす ぐ あとの 数字 は それぞれの H 
P です （乱数に よって 決まる ので だいたい 
このぐ らい）。 と り あえず グループ 0 にォー 
ガのデ 一 タ セット が 完了 しまし た。 次に， 
グループ 1 に， トロール を セットし ます。 


Sl(ret) ： グループ 1 を セット 
2 (ret) ： 2 匹 

(ret) ： HP は コンピュータが 決定 

6 + 6(ret):HD = 6+6 

3(ret) ： #AT=3 

5-8(ret) Idamage 5-8(or 1*4 + 4) 

(ret) ： 同じ 場合 は 省略で きる 

2*6(ret) ： damage 2-12 (or 2 *6) 

(ret) ： 当たり やす さの 修正な し 
こ れで， トロール がセ ット され まし た。 

ところで， 仮に アリーナ を グループ 2 に 
セット するとしたら， 

S2(ret) ： グループ 2 

l(ret) ： 1 尺 

35 (ret) ： HP=35 

F7(ret) ： し evel 7 Pightei- 
Z^et) ： 2 回 攻撃 

l*8 + 2(ret) ： ダメージ ld8+2 

(ret) ： 同じな ので 省略 

1 ： 剣の 当た り やす さに + 1 の 

修正が ある。 

となり ま す。 

モンスターの グループ は 0 ~ 2 の 3 つで， 
それぞれ 8 匹まで。 それぞれの モンスター 
の 攻撃 回数 は 8 |"| までとな つてい ます。 

なお， すでに 使われて いる グループ を 使 
おうとす ると， OK?(Y/N)， と 問いて く 
るので， Y か N で 答えて ください。 ここで, 
「N = 」 と敉を 聞いて きたと き， （ret) とす 
ると， その グループ は 初期化 されます （何 
も 設定して いない こと になる）。 

ま た， グループ 問 コピーと いう こと がで 
きます。 メイ ン 画面で, 

s2 = l(ret) 
などと すると， モンスターの 数 を 聞いて き 
た あと， グループ 1 の モンスター データが 
グループ 2 に コピー されます。 
* モンスターへの 攻擎 

メイン 画面で， グループ 番号 だけ を 入力 
する と その グループの HPcalc モードに 入 
り ます。 

とりあえず， ブライの ファイア 一 ボール 
という ことで， まず メイ ン画而 で， 0(ret) 
とすると， コマンド ライ ンが, 

HP calc (0) ： 
と な る はずです。 こ れが HPcalc モー ド て", 
こ の 段階で は グル ープ 0 の ダメージ を 計算 
できます。 オーガ A から D に ファイア一 
ボールで 23 ダメージ という ことで， 

HP calc ( 0 ) :ABCD23F/16(ret) 
と 入力して ください。 これ は， ABCD に, 
炎に よって （F), 23 ダメージ， Saving Thr 
ow は 16, という, S 味です。 そして， （ret) 
とすると， HPcalc モードから 抜ける ので， 


次に， 1 (ret) として， HPcalc を グループ 
1 に 移し， トロールの ダメージ を 計算し ま 

す。 

IIP calc ( 1 ) ： AB23F/14(ret) 

次に ァ リ 一ナ のリ. えた ダメージ を 入力。 
HP calc ( 1 ) :A15(ret) 
剣の ダメージに は Saving Throw は な (■ - の 
で， このよう にな り ます。 

また， HPcalc モードに 入らずに， メイ 
ン 画面 か ら 直接， 

S,A,R,0-2,Q>0ABCD23F/16(ret) 
のよ う に しても ダメージ を 入力で き ます。 
このと き は モー ドに 人らずに メ ィ ン 画面に 
戻って きます。 

ところで， ファイア 一 ボールの ところで 
触れました 力 ; ， ダメージ を 記述 するとき 後 
ろに 「F」 をつ ける と 炎に よる ダメージと 
いう ことになります。 これ はリジ 'エネ レー 
卜する モン スターの ための ものです。 

ま た ， 特殊 な ダメージ として， 魔法 な ど 
による マヒ や 金 縛 り が あ ります。 こ れは， 
ダメージの ところ を 「*」 で it き 換えて く 
ださい。 Saving Throw も （設定して いた 
ら） 实 行され ます。 た と えば， 

HP calc ( 1 ) :AB*/14(ret) 
のように します。 マヒ した モンスター は， 
アルファべ ッ ト が 小文字に な り ， 攻撃で き 
な く な ります。 マヒ を 解除す る に は， も う 
一度 「*」 を すれば 戻 り ま す。 
* モンスター 側の 攻擎 

それで は， モンスターの 攻搫 です。 メイ 
ン 画面 か ら， A に 絞け て 攻撃す る グル 一 プ 
の 番号 を 入力し ます。 この場合， グループ 
1 の ト ロールな らば， 

S,A,R,0-2,Q>Al(ret) 

Advanced Dungeons S Dragons 

TSR inc. 

AD&D は D&D ( Dungeons & Dragons ) の改 
良 版で ある。 英米で は D&D より も はるかに 主 
流で， おそらく 世界で いちばん メジャ一 なテ 
—ブル トーク RPG だろ う。 D&D の 手軽 さ （プ 
レイ アビ リ ティの 高さ） を できるだけ 生かし 
ながら， 発散して いく ゲーム バランス を 抑え 
込む 努力が 各所に 見られる。 

現在 は 第 2 版 (2nd edition) が 出回り 始め 
たと ころで あり， 日本語 版 も徐々 に が 出る 
予定 だ。 また， 英語が 読めるならば 膨大な 数 
の 良質な 市販 シナリオ を 利用で きる。 私が 思 
う に 最もよ く でき た テーブル トーク RPG で 
ある。 

マスタ一 ガイド， プレイヤ一 ハンドブック， 
モンス タ一 コンペ ディウ ムが 最低 必要で， ほ 
かに 拡張 ルール や 世界 設定 集な ど あり と あら 
ゆる ものが ある。 みんな 揃えようと 思う とと 
つても お金が かかる。 
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とします。 する と 蜊而 は， 


Gld20[14] [7] [15] 
thO 13 —1 6 -2 
dmg o d 4 
->A hit ret/N! 


のようになります ほし 数に よ つ て 決ま る の 
で 必ずし もこのと おりで はない）。 

左側 上から， 「G1」 は グループ 1， 「th 
0 13」 は， THAC0 が 13 である， 「― >A」 
は， トロール A の 攻撃で ある， という こと 
を 表して います。 また， 「d20」 の 右側 は, 
攻撃の サイの 目， その 下 は その サイの 目で 
当たる AC, その 下， 「dmg」 の 右側 は， 
そ れ ぞれの 攻撃の ダメー ジ です。 

ここで， （ret) とすると， その グループ 
の 次の モンスターに 移ります。 また， N を 
入力す ると， 直接 メイン 画面に 戻ります。 
なおこ こで は， サイの 目の 「20」 は 絶対 当 
た り， 「1」 は 絶対 外れと しています。 

• リ ジ エネ L ^一 ト 

モンスターの リ ジ エネ レー ト もサ ポー ト 
しています。 リ ジヱネ レートが 始まる ラウ 
ンドに な つたら， メイン 画面から， 

Rn m ( ret i 
とする と， グループ n に， 毎 ラウンド mHP 
のリ ジェネレート がセ ット されます。 たと 
えば， グループ 1, 毎 ラウンド 3HP なら， 

Rl 3(ret) 

とします。 セットが 終わったら， 毎 ラウ ン 
ドの 最初に メイ ン 画面で， 
R(ret) 

と す れば， 自動的 にす ベての リ ジヱネ レ 一 
トが 行われます。 また， 炎に よる ダメージ 
(F をつ けた ダメージ） はリ ジェネレート 
しません し， 最初の HP を 上回る こと は あ 
り ません。 


* ファイル 入出力 

CST を 終了す るに は， メイン 画面から， 
Q(ret) 
とします。 すると， 

quit ： filename/ret/N = 
と 表示され ます。 ここで， （ret) とすると， 
終了し ます。 また， なに か ファイルネーム 
を 指定して やる と， 現在の データ をフ アイ 
ルに 書き出してから， 終了し ます。 また， 
N とすると メイ ン 画面に 戻り ます。 

ここで 書き出した データファイル は， R 
AM ファイルに 記憶され ています。 CST 
の 起動時に， この ファイルネーム を 指定す 
ると， その データファイル を 読み込みます。 

したがって， その tl に 出て くる モンス タ 
一 を あらかじめ セッ 卜 してお く こ とに よ り， 
そのと き の 手間 を 省 く こ と がで きます。 
* 実行の 仕方 

プログラム は 7.5K バイ ト あり ますから 
それ以上の RAM ファ ィルを 確保して から， 
リスト を 入力して く ださ い。 PC-E500 のよ 
う に エンジニア リ ング モー ドが 使える 機種 

では， ファイル 名 を 「COMBAT.l##」 など 
としてお くと エンジニア リン グ モー ドで呼 
び 出せて 便利です。 実 際， 私 の E500 では メ 
ニュー はすべ て AD&D 用に 使われて い ま 
す。 すべて BASIC な の で テっ < ッ グ は 楽で 
す 力 5 ， 最初の ほ う に 「on error gotoj が 
使って ある ので， デバ ッ グが 終わ るまで は 
REM 文に してお いて く ださい。 

| 開発に 当たって 

この プログラム はも と も と PC— E500 で 
開発した ものです が， 今回 PC-9801 上の 
エディタで 書き直し， RS-232C で E500 に 
転送した ものです （E500 の RAM ファイル 


が 飛んで しまつ て 最初の プ ログ ラム が诮 え 
てし まった からです）。 

結局 98 上で 再度 開発 し たのです が， 開発 
はノ ■? ソ コンの ほう が 遥かに 効率が 上がる し 
安全性 も 向上し ます。 本格的に ポ ケコン を 
使いたい 人に は， RS - 232C レベル コンバ 
ータ 「CE— 140T」 で パソコン （テキス ト 
フ アイ ルが エディ ット できる もの） に 接続 
する こ と をお すすめし ます。 

なお， この CE- 140T の マニュアルに 揭 
載され ている サンプルの 通信 プログラム は 
かな り 使い 勝手が 悪 く ， なんだ こ り や？ と 
思って 使って いたのです 力 ? ， あるとき ふと， 
save "com: " 
load "com:" 
とすれば いい' と いう こ とに 気づき ま した。 
普通の 人 はそう やって 使 うんだ から， その 
ぐらい マニュアルに 書いて おいて く れれば 
よかった のに。 と いいつつ 以後 は 便利に 使 
つてい ます。 通信速度 も 9600bps で も 取り 
こぼし はない よ うです （X パラメータ 付き）。 

この ボケ コンは 一度 通信 パラメータ を設 
定 すると， リセット しない 限り 内容 は 保存 
されて いるので， あたかも PC- 9801 ( や X 
68000) の ハードディスク をポ ケコン につ 
ないで いるよ う な 感じで 使う こ とがで き ま 
す。 

* 

D&D， AD&D 以外 を やって いる 人 は， 
がんばって それ 用の プログラム を 書いて く 
ださい。 また， この プログラム では 「ヒド 
ラ」 は サポートされ ていません。 それから 
今回の プログラム は PDS と して あっかつ 
て かまいません。 ネットに アップす るな り 
(？) 改造す るな りご 自由に どうぞ。 

次回 はちよ つと した ツール や， シナリオ 
の 作り方な ど を 書いて みよ う と 思います。 


リス 卜 1 マスター 戦讕 支援 ツール CST 


00 CLS ： CLEAR ： RANDOMIZE 

10 ON ERROR GOTO tERW 

20 PRINT "** rombat. suppor t too] ♦ 聿.' 

30 MN=7 

40 DIM HP! 2 ,M^J ) , HPORGI 2 ,M\ I ,N t 2 ) ,ST.\T 
P| 21 ,GHD$( 2 ) , DMGN (2,7 ) .DMtiDI 2 , < I , DMGP 
50 F$=" " ： INPUT "file name/ret= " ; FS ： IF 
6U *LOOP 

70 GOSUB *SETD1SP 
80 *LPMAIN 

90 GOSUB *SETLINE:SS="":INPCT "S ,A, R , 
200 IF St = " " THEN *L(K)H 

210 A$=LEFTS (SS , 1 I :SS = RIGHT3 (S5 ,LEN 
220 IF AS = "S" GOSUB *SE:T:GOTO ，LOOP 
230 IF A$="A" GOSUB *ATTACK ： GOTO 韋 LOOP 
240 IF A$s"'R" GOSUB (REGENli : GOTO *LOOP 
250 IF A$="Q M GOTO *QUIT 

260 IF "0"<=AS AND AS< "9" THEN G = V.\L \ 


270 GOTO 化 OOP 
280 *RE0ENE 


G>2 RETURN 

THES R(G1=VA し （RIGHTS 


THEN 


THEN HP(G,JI=HPOHG(G,J 
340 NEXT J 
350 NEXT G 
360 RETURN 
370 <SET 




380 A$ = LEFTS (SS , 1 ) 



390 G=VAL (S$ ] :CPY=0 



憎 IF G<0 OR G>2 RKTURN 



410 FOR 3 = 2 TO LEN SS : IF M1DS ( SS , J , 1 1 = '■ = •■ THES GC=VAL ( RIGHTS 

,THAC0( 2 1 , NAT! 2 ) ,(; 


S$, し EN S$-J ) ) :CPY=! ： IF N(GG)=0 THEN RETURN 

MN ) ,R(2 ) 


420 IF N{G) THEN GOSUB *SETLINE ： PRINT □ ； " i s now used. OKI V/N ) ？ 

THEN* 'jOSI B * LDATA 


Y$ = INPUT ${ 1 J ： IF Y$<>"Y" RETURN 

430 GOSUB 拿 SETLINE:N=0: INPUT "N=" ;N:IF N<0 OR N>MS+1 THEN 430 
44d N(G)=N: IF N=8 THEN RETURN 

453 IF CPY THEN GOSUB *CPY ELSE GOSUB *MSTR 
460 RETURN 
470 *CPY 

:VAL LEFTS (SS , 1 ) 


480 GHP(G) =GHP(GG) ： HPG=GHP(GG) : GHDS ( G ) =GHDS ( GG )： GOSUB * LEVEL 
490 NAT(G)=NAT(GG) ： IF NATtG) =0 THEN RETURN 
500 THAC0(G)=THACO(GG) 
510 FOR J=0 TO NAT(G)-l 
520 DMGN ( 0 , J ) =DMGN ( 00 , J ) 

*Sl'TDMG:GOTO *lpma 


530 DMGD ( G , J ) =DMGD ( GG , J ) 
540 DMGP ( G , J ) =DMGP ( GG , J ) 
550 NEXT J 
560 RETURN 
570 *MSTR 

- 1 ) ) :RETLRN 


580 GOSUB »SETLINE ： HPG=0: INPUT " HP= ( /ret ) " ; HPG 
590 GHP(G)=HPG 

600 GOSUB *SETLINE:HDS = " ' :PRINT "HD/LV = " ； ： IF HPG>0 THEN PRINT 

HFIG, J ) >HPORG(G, J ) 


/ret)" ； 

610 HD*="0" ： INPUT " " ;HDS 

620 IF HPG=0 AND HD$="0" THEN N ( G ) =0 ： RETURN 

630 GHD${G)=HDS:GOSUB *LEVEL 

640 NAT(G) =0 

650 IF HD*="0" THEN 680 


258 Oh! X 1990.9. 


G03UB »SETLINE: INPUT '>at= " ; NAT ( G ) 

IF NAT(G) >0 THEN GOSUB *SETAT ELSE NAT(C) =0 

RETURN 

* SET AT 

FOR J=0 TO NAT(G)-1 

S$="+0e0" :GOSUB *SETLINE:PRINT "dm8";J+l;"(/N)= 

IF 3*="N" AND J>0 THEN J=J-1 :GOTO 710 
IF J=0 OR S$<>"+0O0'* GOSUB *SETNDP 
DMQN (G, J ) =ND: DMGD ( G , J 1 =DT : DMGP(G t J ) =P 
NEXT J 

GOSUB *SETLINE:T=0: INPUT "TH adj=" ;T 

THAC0(G)=THACO(G)~T 

RETURN 

•LEVEL 

A$=LEFT$ (GHD$(G) , 1 ) :S$=RIGHTS ( GHDS t G ) , し EN GHD 
THEN S$="0" 

DT=8:ND=9999:P=0:CL=B:HS=GHD$(G) 
IF A$="F" THEN DT= 1 0 : ND=9 : P=3 ： CL= 1 : H$=S» 
IF AI="C" THEN DT=8:ND=9:P=2:CL=2:HS=SS 
IF A$="T" THEN DT=6 ： ND= 1 0 : P=2 : CL= J : H$=S$ 
IF At="M" THEN DT=4 : ND= 1 0 : P= 1 :CL=4 :H$=Si 
HD=VAL H$ 

IF HD>ND THEN P=P*fHD-ND) ELSE ND=HD:P=0 

P=P+EVAL H*-VAL H$ 

GOSUB tTHAC0 

THAC0(G)=THAC0 

FOR J=0 TO N(0)-1 

STATUS (G, J )=fl 

IF HPG=0 THEN GOSUB »NDP ： HPORG ( G , J ) =R ： HP I U , J ) =R 


THEN HPORG(G, J 


IF HP(G, J 
NEXT J 
RETURN 
ITHACO 

IF C し〉 0 .THEN *FIG 
*MON 

P>=3 THEN HD=HD+1 
HD>=1 THEN THAC0= 
RETURN 


THAC0=2 
RETURN 


THEN *CLE 


CL>2 THEN tTHI 
HAC0=28-INT t {HD- 
RETL'RN 

II 

CL>3 THEN tMAG 
THAC0=2O-IST I <HD- 
RETURN 
MAQ 

HAC0=2O-INT ( ( HD- 
RKTURN 

SETNDP 

OR P=l TO L 

F MIDS (SS , 
NEXT P 
GOTO »NDPMM 

NDPNDP 


= "* M THEN' » NDPNDP 


*" THES 128U 


F MIDS (S$,P 
NEXT P 

S$=RIGHT» ( SS ,LEN SS- P I 

DT^VA し S$ 

P=EVA し S ト VAL S$ 

RETURN 

tNDPMM 

MIN=VAL SS 

IF EVAL SS=MTN THEN NAX=MIN 


\ = -EVAI, SS + MIN 


380 DT=(MAX-P)/MM 

390 IF DT=1 OR DT=2 
3T=12 OR DT=20 THEN 

iee DT=e 

1 10 NEXT MM 

420 IF DT=0 THEN ND= 

1430 RETURN 

1440 »NDP 

145*0 R=P 

1466 FOR JRND=l TO ND 

B R=R+RND DT 

1480 NEXT 

1490 RETURN 

1500 «SETDISP 


1740 PRINT *1 ,DHGN(G,J 

1750 NEXT J 

1760 FOR J=0 TO N(G)-1 

1770 PRINT #1 ,HPORG(G t 

1780 NEXT J 

1790 NEXT G 

1800 CLOSE 

1810 END 
1820 れ DATA 

1830 OPEN "E: "+FS 


INPUT AS 


:RETURN 


1850 IF EOF (1) THEN CLOSE 
186(3 INPUT #1 ,GHD$ (G) ： INPUT 
C0{G) ： INPUT tl ,NAT(G) 
1870 FOR J=0 TO NAT{G)-1 
1880 INPUT #1,3$： GOSUB *NDPNDP ： DMGN ( G 
J)=P 

1890 NEXT J 


1910 INPUT #1 ,HPORG{G,J) :HP(G, J I 
1920 NEXT J 
1930 NEXT G 
1940 CLOSE ： RETURN 
1950 tATTACK 

1960 IF G<0 OR G>2 RETURN 
1970 IF N(G) =0 RETURN 
198 & IF NAT(G) =0 RETURN 
1990 FOR J=0 TO N(Ct-1 
2000 CtS 

2010 IF HP(G, J K=0 OR STATUS I G, J 
2020 PRINT "G" ； CHR$ (4 8tG) ；" d2Q 
2030 PRINT US I NG " th0# t e " ; THACO ( 
2040 FOR K=0 TO SAT(G)-1 
2050 R=RND 20: IF R=20 THES T$=" ！ 
SE T$=STR$ (THAC0(G)-R) 
2060 RS=RIGHT$ ( " "+STRS R, 2 ) 
2070 LOCATE 7+K* 4 , 0 : PRINT " ( " ;RS 
2080 ND=DMGN(G,K I :DT=DNGD(G,K) :P 
*4,2:PRINT USING *'####■' ;R; 
2090 NEXT K 

2106 IF INKEYS <>'■" THEN 2100： 
21 16 LOCATE O , 3 ： PR I NT "->" ;CHRS (65 + J) 
LOCATE 10, 3 :PRINT "htt ret/N! " ； :A 
IF A*="N" THEN 2150 

*skpat:next J 

RETURN 


： INPUT t\ ,GHP(G) ： INPUT * 1 , 


： DMGDI (； , J )=DT:DMGPH!, 


X) TIM'S ISKI'AT 


"]":LOrATE 7 + K* l , 1 :PRIST " " ;TS 
DMGP(G,IU ： GOSUB * «DI* ： LOC ATE ti + K 


2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
； S$:LOOP 
2220 IF 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2328 
2330 
2340 
2350 


•SETDHG 


LOOP=0 
•LPDMG 


G>2 RETURN 
RKTURN 


THEN GOSUB tSETLINE : PRINT "HPf?aW 


IF S$=" " THEM RETURN 
FOR J=0 TO N(G)-1 :F( J)= 
A$=LEFT$ {S$, I ) :IF A$<"A 
P( ASC AS-65 )=1 
FOB J=2 TO LEN SS 
A$=MID$ (S$, J, 1 ) : IF A$<" 
F(ASC A$-65 1=1 
NEXT J 

IF A$="* M THEN HOLD=l EL 
S$=RIGHT$ (SS , LEN SS-J+l 
DMG=VAL S$:SV=21:FIBE=0: 


"<AS THES RETURN 


THRN 230ii 


IF MID» 
IF MIDt 


THEN mHE = 
THEN SV=VA 


0 2370 
2360 NEXT 
2370 FOR 
2380 IF F 
2390 D=D2 
TUS (G, J) 
HP(G 


=0 THEN 2420 
SV>RND 20 THEN 


LD THEN STATUS(G,,I) = 1-STA 


HP(G,J)-D:IF FIRE THEN HPOKGlG,Jl=HPORG【t;, 
IF HP(G,J)>HPORG(G,J) THEN HP ( G , J ) =MPC)RG { G , J ) 
NEXT J 
GOSUB IDISP 

IF LOOP THEN S$=" " : GOTO * LPDMG 

RETURN 

*SETLINE 


70 LOCATE 0 , 


： PRINT 


2500 
2510 


IF INKEYS THES 2-180 
RETURN 

*ERR:PRINT '.DISK EKROR : 


D&D の 場合の 変更 点 


1530 LOCATE 0,G: PRINT "GROUP" ； RIGHTS ( STRS G , LEN ！ 

3 IF N(G)<=0 THEN 1560 
1550 GOSUB *DISP 
1560 NEXT G 
1570 RETURN 
1580 «DISP 

B FOR J=8 TO NIGJ-1 
B LOCATE 7+4 *J ,G 
1610 IF HP(G, J ) <=0 PRINT " " ； :GOTO 1630 

1620 PRINT HP(G,J» ； : LOCATE 7"»J,G:IF STATUS I G, J 1 
R< (97 + J } ； ELSE PRINT CHRS (65 + J ) ； 
1630 NEXT J 
1640 RETURN 
1650 »QUIT 

1660 GOSUB *SETLINE:F$="" : INPUT "qui t : f i lennme/ret 
3 IF F 毒 = '•'■ THEN END 
9 IP F$="N" THEN »LOOP 
1690 OPEN "E:"+F$ FOR OUTPUT AS #1 


THEN PRINT 


B IF N{G)<=0 THEN 1790 
1720 PRINT #1,GHD$(G) :PRINT 
C0(G) ： PRINT #1 ,NAT<G) 
1730 FOR J=8 TO NAT(G)-1 


,GKP(G ) ： PRINT 


】 麵 
1010 
1020 
1030 
1040 
1050 
1060 
1070 


TUHN DT= 
THEN DT= 
THEN DT= 
THEN PT= 


IF P>=3 THEN HD=H1'+ 1 
IF HD<=7 THEN THACH= 
RETl'RN 
♦ FIG 

IF C い 1 THEN *CLE 
THA['0=19_I!>m 1HD -】 1/ 
RETl'RN 
窜 CLE 

IF CL>2 THES 
THAC0 = l! 
RETURN 


*THI 


IF CL>3 THE?s 
THAC0=19-INT 
RETURN 
*MAG 

THAC0=28-INT 


tMAG 


THA("0=16-1MTIMU/^) 
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バックナンバー 案内 



こ 二に は 1989 年 9 月 号から 1990 年 8 月 号まで をご紹 
介し ました。 現在 1989 年 10 〜に， 1990 年 1~ 8 月 号 
までの 在庫が ございます。 バックナンバー および 定 
期 講読のお 申し込み 方法に ついては， 174 ページ を 参 
月 S してく ださい。 








S 月 号 （品 切り） 

特集 活用 ハードディスク & プリンタ 

各社 ハードディスク 接続 総チ i ック /ハードディスク 雑学 
講座/ COPY キー メニュー/ビデオ フリン タ 活用 プログラム 他 
THE SOFTOUCH ジェノサイド/ 琉 球/ mFORTH Compiler 
参 サイバー スティックで 遊ぶ 不思議な 環境 ソフトの 世界 
*X1/X1turb0 用 シュ一 ティング ゲーム Defeat X 
Z80's Bar /MZ - 2500 グラフィック エディタ 他 
[X68000] X-BAS に/マシン 語/ C 調 言語 講座/ D5GA.CGA 
全 機種 共通 システム 生物 進化 シミュレーション BUGS 

10 月 号 

特集 ゲーム 面白 心理学 

ソ ーサリ アン' 宇宙からの 訪問者/ファンタジー ゾーン 

ねじ 式/ガウ ディ' バルセロナの JE/ サ パッシュ 他 
き MZ- 700 用 シュ一 ティング ゲーム Side Roll-F 
き X1/X1turdo 用 カード ゲーム Bonding 
ショート プロ/ Z80's Bar/MZ-2500 グラフィック エディタ 
X68000 マシン 語 /X-BASIC/C 調 言語 講座/ D6GA.CGA 
THE SOFTOUCH Z'sTRIPHONY DIGITAL CRAFT/James68K 
全 機種 共通 システム 小型 インタプリタ 言語 丌 I 

11 月 号 

特集 microcomputer 入門 

初歩からの CPU 物語/ RISC プ C3 セッサ の 設計と 製作 

X68000&X1 で 周辺 LSI を 使いこなそう 
連] ショート ブ 口/ Z80's Bar/MZ-2500 グラフィック エディタ 
^ X68000 マシン 語 /X-BAS に/ C 調 WIS 講座/ D5GA.CGA 

• .X68000 用 カード ゲーム ばばぬき 

LIVE in '89 メタル ホーク/ ォブ ，ラ' ディ， 才ブ 'ラ' ダ 
THE SOFTOUCH Stationery PRO-68K/ リンク マスタ一 1 
全 機種 共通 システム TTI 用 パズル ゲーム PUSH BON! 

12 月 号 

特集 c プログラミングへの 招待 

付録 C 言語 簡易 リファレンス 
「連 | ショート プロば 一て い/ Z80's Bar 
|tfe I X68000 マシン 語 /X-BASIC/DGGA'CGA 

• Oh ！ X2 周年 特別 企画 「素粒子の 声が 聞 二え る」 
*XI/turbo 用 アクション ゲーム ACTIVE UNIT 
LIVE in '89 天空の 城 ラビ ユタ/ギャラ クシ 一 フォース 
THE SOFTOUCH 38 万 キロの 虚空 〃ニーみ のる 2 
全 機種 共通 システム SLANG 用 リダ ィ レ クシ ヨン ライブラリ 

1 月 号 

特集 1 才 ペレ一 ティング スタイルの 研究 
特集 2 C プログラミング 応用 編 

[^ショー トフ 口ば 一て い/ Z80's Bar 

I 載 1x68000 マシン 語/ C 調 言語 講座/ D6GA'CGA 

• XI /turbo 用 シミュレーション ゲーム Super Battle 
LIVE in '90 さよなら を 過ぎて/ RYDEEN 
THE SOFTOUCH レ ナム/メタ ソレ サイト 

全 機種 共通 システム WORM KUN/ 再 掲載 SLANG 
特別 付録 X68000 THE SOFTWARE CATALOGUE 

2 月 号 

特集 画像 圧縮への アプローチ 

[Sj ショート プロ ぱー てい/ Z80's Bar/DoGA-CGA 

I 整 I X68000 マシン 語/ C 調 言語 講座/ X-BASIC 調理 実習 

• X68000 用 ゲーム プログラム GonGon 

• 用紙 芝居 Eyelarth 

LIVE in '90 ォ一 ダイン/魔女の 宅急便 

THE SOFTOUCH A-JAX/ フ ラッピ一 2/ 夢幻 戦士 ヴァ リス D 

マジック バレット/ Mu-1/CYBERNOTE PRO-68K 
全 機種 共通 システム 超 小型 コンパイラ TTC+ + 


am 



i:C^r^i:'.-;,\-! [T、 


に； b 




UhiU 
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3 月 号 

特集 MUSIC アドベンチャー 

X68000 用 MIDI ドライバ & 音源 エディタ 
なんでも 鳴らせる 0PMD.X/MML を 楽譜 データに 
ショート プロば一 てい /Z80's Bar/D6GA-CGA 
I 載 |c 調 言語 講座 /X-BASIC 調理 実習 

• Xl/turbo シミュレーション CRISIS in Tokyo 
LIVE in '90 パワー ド リフト/スキーム/となりの ト トロ 
THE SOFTOUCH ナイト アーム ズ /斬/ダン ジョン マスタ一 
全 機種 共通 システム 超 多 機能 アセンブラ OHM-Z80 

4 月 号 

特集 ゲーム システム 文学 誌 

1989 年度 GAME OF THE YEAR 発表 

j 連"] ショート プロば 一て い/ Z80's Bar/DoGA-CGA 
I 載 I X-8AS に 調理 実習/ C 調 言語 講座/ X68000 マシン 語 
*X1 -MZ- 2000/2500 用 RPG The Cave of Dalk 
* うわさの 68040， ついに 登場 
LIVE in '90 バー ニン グ フォース （0PMD 対応） 
THE SOFTOUCH The Fille Professor/HOST PRO-68K 
全 機種 共通 システム フ アジ イコン ピュー タ シミュレータ 卜 MY 

5 月 号 

特集 BAS に プロ グラ ミ ング 
第 5 回 言わせて くれな くち ゃだヮ 

ショート プロば 一て い/ Z80's Bar 
| 載 | X-BAS に 調理 実習/ X68000 マシン 語 プログラミング 
* 新 機種 X68000SUPER- HD/EXPERTn/PROD 
* ラジコン スティックの 製作 
LIVE in '90 TURBO OUTRUN 
THE SOFTOUCH 天下 統一 / ポピュ ラス/ Hyperword 
全 機種 共通 システム インタプリタ 言語 STACK 

6 月 号 

特集 創刊 8 周年 記念 PRO- 68K (付録 5"2HD) 
Oh IX アン ケー ト 結果 大分 析 大会 

同 ショート プロば 一て い/ Z80's Bar/PurePASCAL 
I 載 |x- BASIC 調理 実習/ X68000 マシン 語 プロ グラ ミ ング 

• Xlturbo 用コ マン ド シェル シミュ L ^一 タ 

* ハ一 ドウ: L ァ 工作 入門 

LIVE in '90 ナイ 卜 アーム ズ /悪魔 城 伝説/二の 木なん の 木 
THE SOFTOUCH 三国志!!/ FAR SIDE MOON/ グラナダ 
全^ ^通 システム X68000 用 S-0S"SW0RD "他 

7 月 号 

特集 マシン 語への 第一 歩 

X68000SUPER- HD 試用 レポート 

5] ショート プロば一 てい/ Z80's Bar/DoGA-CGA 
X-BASIC 調理 実習/ PurePASCAL 

• INTEGRAL XI —— ノーマル XI への 文ォ応 
* ハ一 ドウ エア 工作 入門 

LIVE in '90 夢幻 戦士 ヴ アリス II/ トッカー 夕と フーガ 二 短 脚 
THE SOFTOUCH サーク /あ 一く しゅ/ダウンタウン 熱血 物 S§ 
全 機種 共通 システム リ ロケータ ブル アセンブラ WZD 

o ョぞ 

特集 ADVANCED 2D GRAPHICS 
100 号 記念 特別 モニタ プレゼント 

ショート プロば一 てい/ Z80's Bar/INTEGRAL XI 
X- BAS に 調理 実習/ X68000 マシン 語 プログラミング 
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LIVE in '90 OMENS OF LOVE/ENDLESS RAIN/ ダート フォックス 
THE SOFTOUCH 大 航海 時代/ウル ティ マ V, /プロ ミスト ランド 
全 機種 共通 システム リンカ WLK 


載 


160 Oh! X 1990.9. 


プ レゼ ン 卜の 応募 方法 

と じ 込みの ァ ンケ一 ト は 力、' き の 該当 項 目 をす 
ベて こ 1 己 入 のうえ， 希望す る プレゼント 番号 
を は 力 < き 右下の スペースに ひとつ 言 己 入して お 

申し込みく ださい。 締め切り は 1990 年 9 月 18 
日 の 到着 分 までとし ます。 当選者の 発表 は 1 9 
90 年 II 月 号で 行います。 


X 議 0 用 


5'2HD 版 2 枚 組 

8, 200 円 


ナム コ の大ヒ ッ卜シ ユー ティング ゲ- 
グ ステージ も 見 もの だぞ。 


3 名 


-厶の リメ イク 版。 X63000 用に アレンジ された ダン シン 


-タウ エス 卜 S06(968) 1236 



ポニ一 キヤ 二 オン S03(22I)3I6I 


ウル ティ マ V 


XB8000 用 5'SHD 版 S 枚 組 


9, 800 円 



□-Again 


X6B00 圆 5 2HD 版 4 枚 組 


8, 800 円 


3 名 


3 名 


根強い 人気の ある ウル ティ マ 

シリーズ 第 5 作。 これ は ウル 
ティ マ IV の 続編と なって いる。 
もちろん IV の データが 利用で 
きる ぞ。 


システム ソフト a092(7U)6236 


D^lgain 

I'M 1'； -Ull UNIT FIVE i 


いよいよ 第 4 の ュニッ 卜 シリーズ 
もこの D-Again を もって 第 1 部 
WWWF 編 完結。 ブロン ウィン フ 
アン 必携の アド ベン チヤ一 だ。 


0 


ビジネス • アスキ- 


003(486)71 13 


虹色 ディップ スィッチ 


システム ソフト 
ス 一八 °ーシ ユミ レー シ ヨン 
サウンド 


,718 円 



5 名 


971 円 


あの ドラ クェで 有名な 堀 井 雄 二が, 
ム 業界の 裏話 を 書いた エッセィ 集。 
厶 業界に 興味の ある 人で なくても, 

楽しめる 本 だ。 



7 月号ブ レゼ ン卜 当選者 


大戦 略 n， 大戦 略 m， そして 天下 統一の ゲー 

厶 ミュージック を 収めた CD。 発売元 は 株式 
会社 メル タック。 


D ダウンタウン 熱血 物語 （愛知県） 行松徹 （和歌山県） 木 村 誠 吾 （広島県） 山川 剛信 B サ一 
ク （北海道） 山 崎康則 （大阪府） 岩田薰 （長崎県） 帆 足 慎 二 B 天下 統一 （東京都） 小島 尚 基 
(神奈川県） 赤 城 肇 和 （徳鳥 県） 谷 口 成 広 H フ アル コム システム 手帳 （宮城県） 真 野勝昭 
(岐阜県） 藤 掛弘隆 0 メモ 帳 （福島県） 根 津正博 （栃木県） 毛 塚 健 次 （石川県） 中 村 学 （山 
口 県） 藤 沢邦昭 （熊本県） 松 本英貴 

以上の 方々 が 当選され ました。 おめでとう ございます。 商品 は 順次 発送いた します が， 入荷 
状況な どに より 遅れる 場合 もあります。 また， 公正取引委員会の 告示に より， この プレゼント 
に 当選され た 方 は， この 号の 他の 懸赏に は 当選で きない 場合が あり ますので ご了承く ださい。 

(価格 はすべ て 消費税 別です） 
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NEW PRODUCTS 


162 Oh!X 1990.9. 


び 256K バイ ト が 用意され ている。 用途に 合 
わせて RAM カード を 使用す る ことにより， 
データの 集積， 管理が 容易に 行える。 さら 
に， RS-232C インタフェイス， メモリ カー 
ド インタフェイス， 光通信 ィ ンタ フェイス 
を 標準 装備。 入力 データの 転送 速度の 違い 
に よ つて 通信 方法 を简 単に S 択す る ことが 
でき る。 

こ の 「HC-70」 の ゾフト |招 発はパ ソコン 
h でむう ことができる。 衬 種 は 「エブ 
ソン PC-386/286 シリーズ」， 「NEC PC 
-9801 シ リ 一 ズ」。 ま た， IttHg 支援 用 ツール 
として 「HC - 7(y—# 川 ライ ブラ リ」 が JTJ 意 さ 
れ ている。 

オプション は 以下の ものが 用意され てい 
る。 

• プリ ンタ ュニッ ト 
• 光通信 ュニ ッ ト 

• RAM カード 128K パイ ト /256K バイ ト 

• 充電器 

• 通信ケーブル 

'キヤ リング ケース， スト ラッ プ バン ド 
外形 寸法 203 .5X86. 0X27. 5mm, 重量 は 
本体 約 410g， S 池 パック 約 120g。 連統 使用 
時間 (電池 寿命) 約 15 時間。 価格 は 220, 000 
円 (画。 
く 問い合わせ先〉 

セイコー エプソン㈱ S0266(58)1705 
エプソン 販売㈱ S03 (377) 700 1 



ノー 卜 ワープロ 

WV-700 

シャープ 



シャープ は ノー ト ワープロ 「WV-700」 を 
9 J—l 1 1 1 に 発^ す る。 本体と プリンタ. フ 
口 ッ ピー ディ スク ドライ ブュニ ッ ト が 必要 
に応 じ て 分離 町 能， ま た 厚 さ 3:0 腿， 重 さ 
1.4kg とい う コンパ ク ト サイ ズの 実現に よ 
り， 携带性 を 向上して いる。 源 は 単三ァ 
ルカ リ 乾^池， 充電 式パッ テ リ 一パッ ク （別 
■ft), AC アダプタが 使用可能で， K お 連 絞 
使用 時間 は パク クライ ト才 フ 時で 約 8 時間 

(オン 時 は 4 時間) を 実現 してい る。 価格 は 
218, 0001 リ （税別）。 

< 間い 合わせ 先 > 

シャープ (ffi) »03(260) 1161. 06(621) 1221 
ボケ ッ卜 モデム 

MD24FP4fl/5n 

オムロン 

オムロン はポ ケ ッ ト モデム 「MD24FP4」 
の バージョンアップ シリーズと して 
r MD24FP4II/5II」 を 発売した。 いずれの 
機種 も ェ ラーお' 止 機能 として MNP と 最新 
の 国隨準 規格 CCITT V.42 を 搭載 してい 
る。 特に 「MD24FP5II」 は MNP クラ ス 5 を 
標準 搭敉 し ， そ の 圧縮機 能に よ り 実効 通^ 
速度が 4800bps ま で 向上 さ せ， 信頼 度 も 高 
めて いる。 

さらに， NCU は AA (I'J 動^ 着信） だけ 
でな く MA (手! p 力 56 信 '自動着信)， MM (手 


64K バイ 卜 RAM 標錄備 

PC-E550 

シャープ 



滅 


一 


シャープ はすで に 発売中の 高機能 s ポ 
ケット コンピュータ 「PC-E500」 の 新 機種 
と して 「PC-E550j を ^売した。 

「PC- E550」 は 64K パイ ト RAM を 標準 装 
ft'5。 さ ら に， RAM 力一 ドを装 若す る ことで 
最大 128K バイ ト ま で 拡張可能 となって い 
る。 もちろん， PC-E500ffl の ソフト は その 
まま 使用可能 である。 また， 外観 はホ ワイ 
卜 デザ ィ ン が 採用 さ れて い る。 価格 は 
32, 000. 円 (税別）。 
く 問い合わせ先〉 

シャープ (稱 S03(260) 1161, 06(621) 1221 
八ン ディ ターミナル 

HC-70 

セイコー エプソン 

セィ コー エプソン は 16 ビッ ト CPU の V25 
を搭敉 し 128X 192 ド ッ ト の 大國面 STN 液 
品 パネル を 採 ffl した ハンディ ター ミ ナル 
「ト 1070」 を 発売した。 

「HC-70j では 256K バイ トの 漢字 ROM を 
搭載し JIS 第 1 水^ は もとより， JlSSfS 2 水 
^漢字 も サ ポー 卜して いる。 メモリ は 本体 
内蔵 RAM256K バ ィ ト , 拡張 メ モ リ 用 才 プ 
シ ヨンと し て RAM カー ド 128K バイ 卜 およ 



動 発着 信) に も 衬応 してい る。 価格 は 38, 800 
円と 42, 800 円 (いずれも 税別）。 
く 問い合わせ先〉 
オムロン㈱ 303(5488)3221 

電子 手 翻 。カード 

PA-3C1 9/22-04/26^29 

シャープ 



電子 システム 手帳 用 IC カー ド 


rE 子 システム 手 帳 ffl IC カードの 第 3 弾 
として ソフト 開発 会社 7 社よ り 8 機種が 発 
売され る。 

• ビジネス 英会^ カード 
英会話 約 2, 500 文例， 英単語 約 1,300 語， 世 
界の 都市 情報 を 収^。 
^学習 研究社 

標準価格 9, 000 円 （稅 別) 発売中 
• 「パズル 大 迷お」 力一 卜" 
全 100 面， ェジプ ト の 砂漠 を 舞台に した ァ ド 

ベンチャー 仕 立 ての パズル。 
㈱ァ ス ク 講談社 

標準価格 6, 000 円 (税別) 発売中 
• 'お 子 易 占い カード 「易 道」 
中国 5 千年の 歴史 を 持つ 易 や を 誰に でも ！) a 
単に。 

眯ァス ミック 

標準価格 9, 000 円 （稅 別） 8 n —化壳 
• 旺文社の 入試に 出る 古文 単語 300 
旺文社 PJ 行の 「入試に 出る 古文 単語 300」 （中 
村 幸 弘著） を IC カード 化。 


ゾ フ ト ノ 《ン ク (稱 

標準価格 8,500 円 (棚) 9 月 発売 
'株式 カード 「キャピタルゲイン」 
株価の グラフ， 利益 管理の ための 計算， さ 
ら に は稅ゃ 手数料の 計算な ど を 簡単に。 
II 本 データ 機 

標準価格 8, 500 円 (稅 別) 9 ):j 発売 
• 上海 II カー ド 

さんお 馴染みの 「上海」 力； パワーアップ 
した 「上海 II」 がに カー ドに。 

サン 電子㈱ 

標準 個 i 恪 7, 0001 リ （稅 別） 8 月 発売 
• TALKING BUSINESS カード 

話 約 1,600 文例， 英単 熟語 約 4, 400 語 （う 
ち 700 蠡は 使用 されて いる 文例 を 検索 町 能) 
を 収録 した ビジネス 英会話 カード。 
㈱ァス ミ ッ ク 

標準価格 9, 000 円 (棚) 10 月 発売 
• 多 機能 メモ カード 「ハイパー メモ」 

PA-8600 の 約 2 倍の 記憶容量 を 待ち， アイ 

デァ 次第で さ まざ まな 情報 を 記憶, 活用で 
き る 多 機能 メモリ カード。 

㈱々ィ クロ キャビン 

標準価格 16, 000 円 (蘭) 10 月 発売 
く 問い合わせ先〉 

シ ヤー プ ffi ©03(260) 1161 ,06(621) 1221 
X68000 用 アド イン ボード 

TP-68K/K-TRAM - 2 

国際 デ' 一夕 システム 


TP-68K 



W 際 データ システム は X68000 対応の 大 
'おん;: メ モ リ ft き トランスピュータ アド イン 
ボ一 ド， 拡張 モ ジ ユー ル， お よ び パラ レ ル 


C コンパイラ を 80 よ り 発ゥ' £ する。 

ァ ド インボー ド MODEL TP-68K は 4 
MDRAM を 採 川す る ことにより オン ボー 
ドに 基本 4M バイ 卜， 最大 8M ハ' ィ 卜の 大容 
量 メモリ を 搭載した。 トランスピュータの 
高速 処理 性 と 人お ローカル メモリに より 
X 68000 (： よる レイ トレー シン グな ど を 
速 化する。 価格 は 428, 000 円よ り。 

拡張 モジュール MODEL K- TRAM- 2 は 
ァ ド ィ ン ボ一 ド に 装お: す る ことにより マル 
チ CPU 化 （並列 化） する サブ ボードで あ 
る。 パラ レル プロ グラ ミ ング の' 存ぉ なコン 
ピュー タグ ラフ ィ ック 関係で はト ラン ス ピ 
ユー タの マルチ 数 に ほぼ 比例 して ス ピー ド 
向上が 得られる。 価格 は 260,000 円よ り。 

ノ •? ラレ ル c コンパ ィ ラは トランス ピュー 
タ 111 パラレル コンノ 、"ィ ラ と して^ & してい 

る 英 国 3L 社 製 コンパイラ を 移植 し， XC の 
グラフィック 阅 係コ マン ド を 取 り 込 ん だ も 
の。 C コンパイラと して は K&R に リ£ 全 準拠 
している （ANSI ではない）。 価格 は 268, 000 
円 (すべて 税別）。 
く 問い合わせ先〉 

国際 デー タ システム㈱ 30423(76)4800 

INFORMATION 


第 2 回 サイクロン CG;^ 

アンス' コ ンサル タ ン ッが ヒ 催す る 「サ 

イク 口 ン CG 大会」 が 今年 も 開催 される。 開 
舰 © B 時 は 9 月 24 日 （月) 午後 1 時 'ド よ り 6 
時 ま で. 場所 は 昨年 と 同 じ 東京 } も 谷道玄 坂 
の フォーラム 8 (新人^ ビル） となって い 

サイ クロ ン CG 人 会 は レイ トレーシング 
ツール 「サイクロン」 の ユーザ一 を 対象に 
し た CG 作品 コンテスト で， 昨 年の 第 1 回 人 
会で は X68000 版の サ イク 口 ンュ一 ザ 一 を 
中心 として 質の 高 l ' 作品 に 恵まれ 盛り 上 力 《 
り を 見せた。 

今回 は， PC お よ び FM シ リ 一 ズの ユーザ 
一も^ め， より スケール アップした 大会と 
な る 予定。 K 金 20 万円の グ ランプ リ ほか 赏 

金 • 'it 品 も 多数 ni 意され ている。 

応募 作,',! 1 , の 締め W り は 9 ) し S II で， 以 ド 
の 宛先まで 郵送の こ と。 
〒810 福 岡 市 中央 区 平 丘 町 68 
アンス • コ ン サルタ ン ッ 
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FILES OhiXI 


二の インデックス は， タイトル， 注記 一 
筆者 名， 誌 名， 月 号， ページで 構成され て 
います。 受験生の 方， 夏休みの 間 思うよう 
に 勉強 はは かどり ま した か？ あと 半年の 
辛抱です。 頑張って く ださい。 


一 船 


参考文献 

I/O 工学 社 

ASCII アスキー 

コンブ ティーク 角 川鲁店 

The BASIC 技術 評讒社 

テクノポリス 徳間 書店 

P0PC0M7 月 号 小学館 

マイコン 菴波新 M 社 

マイ コ ン BASK Magazine 電波 新閒社 

LOGIN アスキー 


► ネット ワーカー • ホリ ック第 23 回 

PDS 特集 第 2 弾。 LHARC アーカイバ。 中 山 美 穂の ラジ 
ォ 番組と 連動した ネット 「 中 山 美 穂 P.S. I LOVE YOUj 
を 紹介。 —— 編集部， LOGIN, 13 号， 204-205pp. 
► 特集 記憶す る ものた ち 

フロッピー， CD- ROM . ハードディスク， に カード， 
光磁気 ディスク といった， コンピュータに 不可欠な 記憶 
メディアの 構造， 製造 法な ど を S 羊し く 解说。 —— 編集部. 
LOGIN . 14 号， 128- I4lpp. 
► ネットワーカー • ホ リ ック第 24 回 

大手 ネットの フォーラム 最新 情報。 NIFTY- Serve のび 
ぁ閱連 コーナー や プロレス フォーラム， Rupo- NET など。 
PDS は X 68000 の 3D ポ リゴン フライト シミュレータ 「CA 
PTAIN」。 全国 BBS 探訪 記 は 東京 鈎 町の 「SC-NET」 を紹 
介。 —— « 集 部， LOGIN. 14 号， 216 — 219pp. 

► My Opinion 曰コ ン 連に fo の 申す 

日 コ ン 連 の 実情に 対する 日 コ ン連反 主流 派（ ？） からの 
内部告発 S 己 事。 —— Mr.X 攝集娄 貝. The BASIC, 8 月 号. 
172- 174pp. 

► NEW PRODUCTS 

はがき， リフィ ル への 印字が 可能な 電子 手帳 用 プリ ン 
タ， シャープ CE- 80P を 紹介。 —— 編集部， マイコン BA 
SIC Magazine . 8 月 号. 96p. 
► イメージ スキャナの 徹底 研究 

い ま や 画像処理に 必須に なった イメージ スキャナの 仕 
組み， イン タフ ヱ イスの 問 超に ついての 解锐 記事。 製品 
と 画像 サンプルの 紹介 も 行う。 一 山 田 憲一. マイコン， 
8 月 号， 113— 128pp. 
► ビジネス ツール レポ一 ト 

電子 手帳の 新潮 流， キャノン Ai ノートの 機能， 文字 入 

力の 実力， 実用 性に ついて 考察す る。 佐 田 守弘， マ 

イコン. 8 月 号， 15 卜 ほ 8pp. 
► 実戦 ハー ド 入門 

光 センサ を 使って 風力 • 風向計 を 作る。 PC- E200 など 
でも 測れる ぞ。 一 石 川 至 知， マイコン， 8 月 号， 321 
-325pp. 

► MICOM WATCHING 

NEC の 新 本社 '• NEC スーバ 一タワー" の ユニークな デ 

ザイン や， ネット ヮ一 クサ一 ビスの 秘密に 迫る。 ^ m 

池 秀一， マイコン， 8 月 号. 316- 319pp. 

► ノート 型 パソコンの 正しい 使い方 

急速に 普及しつつ ある ノート パソコン。 ス ベックの 遑 

いや それぞれの 特長に 合った 使い方 を 研究す る。 —— m 

集 部. ASCI し 8 月 号， 257-279pp. 
► ど 一 するど 一す る 研究所 

わから な く な ら ない フ 口 ッ ビーの 管理 法 は ？ デ イス 


ク はどう やって 運ぶ のがい いか？ フロッ ビー は どれく 

らい 丈夫 か？ などの 疑問 を 解き明かす。 文字 真， 

ASCII . 8 月 号. 289-296pp. 

► PRODUCTS SHOWCASE 

シャープ All In Note の ハー ドウ ヱ ァ レポ一 ト。 非常に 
革新的な スタンスに 評価が 高い。 —— 編集部， ASCI し 
8 月 号， 301 -304pp. 

► PRODUCTS SHOWCASE 

最新 光磁 51 ディスク 奉 情と 称して， 8 機種の M0 ドラ 
イブの 機能と 動向 を 探る。 —— 編集部， ASCII, 8 月 号， 
305-307pp. 

► AV STRASSE 

音声 多重 ディ ス プレイ CZ - 6I3D- TN と 0S9- VSED の紹 
介と， GUNSHIP の X68000 版 登場の ニュースな ど褐 載。 —— 
編集部， ASCII , 8 月 号. 375- 380pp. 


MZ シリーズ 


MZ-I500 ( MZ-5Z001 BASIC ) 

► UP DOWN 

ダイヤ をす ベて 取って 始めの 位 It に 戻る。 ショート ブ 
ログ ラム ゲーム。 —— 川辺 悟， マイコン BASIC Magazin 
e , 8 月 号， I28p. 
MZ-2500 { M25 - BASIC ) 
► しらい むの 野望 

全国 を ひとつに まとめるべし。 戦国 シミュレーション 
ゲーム。 —— 白 井 俊 明， マイコン 8AS に Magazine . 8 月 
号， 129- I3lpp. 

Xl/turbo/Z 

X1 シリ ーズ 

► HOLE ON WALL 

7« 類の プロ ックを 使って 壁に あいた 穴 をふさ ぐ。 風 
変わりな パズル ゲーム。 —— JIR0NKA . マイコン BASK 
Magazine , 8 月 号， 155- 157pp. 
► マグネ ッタ君 

リモコン ロポッ トを 操作して 黄 源 をす ベて 取る。 磁力 
パズル ゲーム， —— BANCO . マィコ ン BASK Magazine . 
8 月 号， 158- 160pp. 
► 誌上 公開 質問 状 

CU- I4ED , CU- I4FD は X 68000 と 接続で きる 力、？ XIG 
モ デル 30 で 機械語 モ ニタ から BASIC に 戻 ら ずに データ を 
セーブす る ことができ るか？ などに 答える。 —— 多 田 
太郎， マイコン BAS に Magazine . 8 月 号， 301 p. 
X 1 I FM 音源 ボー ド （要 NEW FM 音源 ドライ バ） 
► マーベル ラン ド 〜アスレチック 面〜 

ナム コの アクション ゲーム， ミュージック プ o グラム。 
—— 小 室 和 生， マイコン BAS に Magazine . 8 月 号. 184 


新刊 害 案内 



ロココ 町 は 5 年 前 廃園に なった ロココ ランド 跡 
地に できた 都市。 「超 遊園地 都市」 。 東京 は 遊 園 
地 都市の一 形態で， ロココ 町 は r 東京の 可能 世 
界 」 の ひとつ。 「都市 は 境界の ない 拡大され た 遊 
園 地」。 作者が 東京 ディズニーランド を 念頭に お 
いている 二と は 間違いない。 ディズニーランド 
は都巿 として は 安全で 人畜無害 すぎる。 人々 は 住 
人 を 演じて いる だけで ディ ズニ一 ラン ドは 人々 の 
ある 部分 を 解放す る 代わりに， ほかの 部分 を 抑圧 
する。 ロココ 町 はそう ではない。 常識 を 越えて 住 
民 を 教育し， 解放す る。 思考 回路 や 行動 形態 を 解 
放して 生まれ変わる。 そして， ロココ 町の一 部に 


ならなければ ならない。 それ を スムーズに 行うた 
めに 「通 伝 子 分析」 なる ものが ある。 遗伝子 分析 
によって あるべき 自分 をみ つけ， ありのまま 快楽 
するな りなん なりす る。 

センスの ない 時代遅れの コ ビ一 ライタ一 のた め 
に 帯に'' SF" と 害いて あるが， これ は SF ではない。 
確か に ひと 昔 前な ら SF とし か 分け ら れ な か つ た 
力 S 今 は一 般 文学と して 成り立つ 時代に なった の 
だ。 そして， これ は 今 を 捉える に 欠かせない 都市と 
遊園地 を 融合した 現代 文学の ひとつで ある。 （K) 
n ココ町 A 田 雅彦著 集英社 303(230)6100 
四六判 243 ページ 1,200 円 
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FILES /Jli/IY 


-185pp. 

XI turbo シリ ーズ 
► 最新 ゲーム 徹^ 

大 航海 時代， セレク テッド ソ一 サリ アン 4 を 徹底 解剖。 
—— *i 集 部， LOGIN. 13 号， 184-185, I98-I99pp. 
► How To Win 

セレク テツ ドソー サリ アン 4， 三國志 ii の 紹介。 —— m 

集 部， コンフ ティ一 ク， 8 月 号， 138 141 , 150- 152pp. 
► ポパの 塔 

色の ついた パネル をす ベて 青に 変える， パズル ゲーム。 
—— 中西弘 幸， マイコン BAS に Magazine , 8 月 号， 161 
-162pp. 


X68000 


ポ ビュ ラス デ一 タ集 「ポ ビュ ラス • プロ ミスト ラン 
ド j と ズームの 新作 ロール ブレイン グ 「ラグ ーン」 を紹 

介。 —— 編集部， LOGIN, 13 号. I7-I8pp. 

► X 68000 新聞 

北海道に ある ソフト メーカー 「ズーム」 と 「デービー 
ソフト」 を 訪ねる。 そのほか ボピュ ラス 'プロ ミストラ 
ンド， トンネル ズ& トロール ズ， ギャラ ガ' 88, Vesse 
I , GUNSHIP, を 紹介,， —— ^集 部. LOGIN, 13 号. 130- 
1 35pp. 

► 最新 ゲーム 徹底 解剖！！ 

トンネル ズ& トロール ズを 徹底 解剖 ！ —— *i 集 部， 
LOGIN , 13 号， 190- I9lpp. 

► NEW SOFT 

新詹 ゲームの 紹介。 ギャラ ガ' 88, ウル ティ マ V,9 月 発 
売の レイン フォー サー。 —— 編集部， LOGIN, ^号， 20 
- 23pp. 


シ厶 シティ一 X 68000 版の 発売 発表。 新着 ゲームの サ 
イノ、' リオン， プロ テニス ワール ド コート， ジェ ミニ ウィン 
グ， M の 血族。 —— 編集部， LOGIN, 14 号， 145- I5lpp. 
► 最新 ゲーム 徹底 解剖！！ 

トンネル ズ& 卜 ロールズの 攻略 法 レポート。 —— ^集 
部， LOGIN , 14 号, 196- 199pp. 
► 先取りお すすめ ゲーム 

ポピュ ラスの シナリオ データ 集 「ポ ピュ ラス ♦ プロ ミ 
スト ランド j を 紹介。 —— 編集部， テクノポリス， 8 月 
号， 8- 10叩. 
► GAMING WORLD 

新 * ゲームの ギャラ ガ' 88, プロ テニス ワールド コー 
トを 紹介。 —— 編集部， テクノポリス， 8 月 号， 20-2lpp. 
► 新作 ゲーム 先取り！ Soft Flash 

制作 中の ソフ ト を 紹介。 銀河 英雄 伝説 II , スペース 
ローグ， クオ 一ター スタッフ， パイ ビヤン， サイ バリ ォ 


ン, Thrice , -i メ 一 シフ アイ ト = 

リス， 8 月 号， 27 -29pp. 
► 攻略お すすめ ゲーム 

ウル ティ マ V を 攻略。 _ 編集部, 
月 号， 54- 56pp. 


編集部, 


^ クノポ 


'ノ ポリ： 


ポビュ ラス 'プロ ミスト ラン ドの 紹介。 —— ^集 部， 
コンプ ティ一 ク， 8 月 号， 146- 148pp. 

► X68000 SPIRITS 

新着 ゲーム， サイ バリ 才ン， プロ テニス ワールド コ一 
ト， 天下 統一， エメラルド' ドラゴン を 紹介 e —— 編集 
部， コンプ ティーク， 8 月 号， 248- 249pp. 

► WE ARE THE X68000 WORLD 

ギャラ ガ' 88, プロ テニス ワールド コート， 閣の 血族 
'上 卷， GUNSHIP と 8 月 発売の サイ パリ オン， Thrice, 
—— 編集部， P0PC0M , 8 月 号， 90- 93pp. 
► ミュージック 'ノ 1 i ビリオン 

ミュージック フロ グラム。 「ババ j By PRINCESS L '。 
—— ^集 部， P0PC0M , 8 月 号， I47_【50pp. 

► SPACE WISP 

単純な 敵よ け ワン キ一 ゲーム。 —— 菅野 類， マイコン 
BASIC Magazine , B 月 号， 163- 164pp. 

► Legend of Adventure 

旅の 途中に 立ち ふさがる 騎士 を 倒して 王女 を 救い出す。 
ジョイスティック 專用。 アクション ゲーム。 —— 林 純一， 
マイコン BASIC Magazine, 8 月 号， 165- 167pp. 
► 恋 のホッ 卜 ロック 

コ ナミの ゲーム ミュージック プログラム。 —— 中 西 道 
―, マイコン BASIC Magazine . 8 月 号. 186- 188pp. 
► 誌上 公開 質問 状 

X68000SUPER-HD は BIOS の 改良が 行われた が， これに 
よ り ゲームの スビ一 ドも 高速 化される か？ X68000 と Xlt 
win の 両方が 接続で き るデ イス ブレイ は？ な どの 5S 問 
に 答えて いる。 —— 多 田 太郎， マイコン BASIC Magazin 
e , 8 月 号， 300-301 pp. 
► ギャラ ガ' 88 

電波 新 閒社か ら 発売 さ れたシ ユー ティン グ ゲーム 
「ギャラ ガ '88」 の メイン プログラマ 佐 伯 氏の インタ ビ 
ュ一。 —— MUNEPI . マイコン， 8 月 号， 186- 187pp. 

► X68000 マシン 語 入門 

グラフィック 加工 プログラム 集。 階 調 ダウン， 色 平均 
ィ匕 画面と ファイルの 重ね合わせ プログラムが 収ま まされ 
ている。 —— 高 橘 雄一， マイコン， 8 月 号， 290 — 300pp. 
^なん でも Q&A 

ビデオ ポー ドと カラー イジ 
現在の パ レツ 卜 コー ドを 調' 
に 答える。 —— ^集 部， マ- 

► Human68k VS MS-DOS 
Human68k について 


； ュニッ 卜の 違い は ？ 
、の だが？ などの 質問 
イコン， 8 月 号， 386- 387pp. 

-DOS との 相違点 • 類似点 を 


検証， Human な ら ではの バ ツチ フ アイ ルの 使用法な ど を 
紹介す る。 —— 吉沢敏 男， 1/0， 8 月 号， 97- 110pp. 

► HDC 

高速 ディスク コ ピ一 プロ グラム。 必要ない 動作 を 省け 
るので 効率的。 なお， セクタ をず らした 変則 フォー マツ 
ト もで きる。 —— 市原昌 文， I/O. 8 月 号， 16 卜 165pp. 

► Graph メ 一力 一 

データ を 入力す ると 折れ 線グラフ を 描画して く れ ると 
いう 理工系 学生の 必需品， グラフ 作成 ソフト。 —— 西方 
茂樹， I/O , 8 月 号， 153- 157pp. 
► コンピュータ • ビールス 対策 

最近 世間 を 賑わせて いる コンピュータウィルスの 動作 
• 対策 • 退治 法と IPL&SRAM チ エツ ク プロ グラムの 掲載,, 
—— 市原昌 文， I/O, 8 月 号， 193- 208pp. 

► PUSHD P0PD 

マーキング 方式の ディ レク ト リ 移動 ブ ログ ラム。 面倒 
な コマンド 入力がない のが 魅力。 —— 井本 裕司， I/O, 
8 月 号， 248- 252pp. 
► 俺って ドラ ムスコ 

ジョイ バッ ドを たたいて FM 音源の ドラ 厶を 鳴らそう,, 
—— 宮城 良 行， I/O . 8 月 号， 256p. 

► ENV.X 

環境 変数 を， あたかも BASIC の 文字列の よ う に 簡単に 
操作す るた めの ツール。 —— 高 橘 美 幸， I/O, 8 月 号. 2 
66 -268pp. 

► G98SX 

SX- WINDOW 用の グラフ ィ ック ローダ。 PC- 9801 の BR 
G データ を ".PIX " 形式に 変換す る n —— Zenobia , 1/ 
0 , 8 月 号， 270-271 pp. 

► LOAD TEST 

X68000 の 長期 試用 レポ一 ト。 第 I 回の 今回 は 購入し 
てから， 同梱の マニュアルの チェック， SX- WINDOW の 
試用まで。 —— 編集部， ASCII, 8 月 号， 426-429pp. 


ポ ケコン 


PC-E500 

► ガン バレ セィ ビィ ン 

荷物と 自分 を， 入れ替えたり しながら， 指定 どおりに 
並び 換える パズル ゲーム。 —— 町 野稔， マイコン BASIC 
Magazine, 8 月 号， I69p. 
► AIR-WOLF 

ヘリ コプタ 一で 敵 を ぶつつ ぶせ ！ バリ バリ シ ユー 
ティング アクション ゲーム。 —— 海上 賁信， マイコン B 
ASIC Magazine , 8 月 号， 170- 171 pp. 
► 表 計算 プログラムの 活用 （4) 

5 月 号の PC- E500 表 計算 フロ グラムと PC-980I のァシ 
スト カル クを 使って データ交換 を やって みる。 —— ^田 
洋一， マイコン， 8 月 号， 327— 331pp. 



数字 オン チの 諸君 ！ 

「数字 オン チと は， 数 や 確率と いった 基本的な 概 
念 をう まく 扱えない こと をい う」。 こういう 人 は 
算数の 教育 レベルが 高い （笑） らしい 日本で も 実 
に 多い。 よって， い一 加減な 数字 ゃェセ 科学に み 
んなコ ロリと 騙される。 本 害 はそう いった 人々 に 
冷た く 優しく 数字の 概念 を 身に つける 大切 さ と そ 
れが なんら 難しくな いこと を 説く。 ひとつひとつ 
挙げる と キリ がない が， 理科 系 人間の 良い 点が 随 
所に 発揮され た 良 害で ある。 みんな 必読！ （K) 
ジョン • アレン • パウロス 著 野 本 陽 代 訳 草 思 
社 003(470)6565 四六判 190 ページ 1，400 円 


X モぉ 



ノ くソコ ン 少年の コスモ 口 ジ一 

コンピュータ を 代表と する ハイテクの 持つ 可能 
性に 魅了され る 人 は 多い。 彼ら は コンビ ュ一タ に 
よって 変わる 精神 や 生活に 視点 を-; 主ぐ。 本 害 も そ 
う。 パソコン 少年に 関する 考察 は イマ イチ だが， 
ポイント は 後半。 バ一 チャル リアリティ など 「 パ 
ソコン を 通して， 人類の コスモロジーに 転換が お 
二る こと」 を 示そうと する。 秀逸な の 力び めまい」 
の 概念。 情報化 は 従来の さまざまな 概念に 「め ま 
い j を 起 二す という。 そのと おりだと 思う。 （K) 
奥 野 卓 司 著 筑摩 書房 ©03(5687)2670 四六判 
202 ページ 1, 440 円 


FILES Oh! X 165 


― X68000 で 常駐 プログラム を 作 
ろうと 思った のです が， 作り方 
がまった くわから な いので 困 つ 
ています。 できる ことなら サンプル プ ログ 
ラム も 交えて， 常駐 プログラムの 作り方 を 
脱 明して ください。 東京都 須藤 和 也 
^ I ^通に プログラム を 終了させる 
| 場 1> は DOS コール! BFFOO(— E 
linil I XIT ) を 使います ね。 この DO 
S コール は プログラム の 確保 していた メモ 

リ？ /(域 をす ベて 開放して し ま いますから， 
プロ グラ ムを 常駐させる こ と な どで き は し 
ません。 ；ぉ»： させたい とき は DOS コール 

$ FF3K KEEPPR ) を DOS コ一 ル$卩卩 
00 の 代わ り に 使います。 
使い方 は U 下の よ う になって います。 
move.w code,- (sp) 
move. I prglen.-(sp) 
dew $FF31 
code に は プロ グラムの 終 |' コー ドを衍 
定 します。 1に' お 終 J' のとき は 0 を 衍 お し て 
おき ましよ う。 prglen に は プログラム を 
常 M させる 範囲 を 指定し ます。 引数 を 必要 
とする DOS コール を 使った あと はス タツ 
クの 補正 をし な 〈てはいけ ません 力 f , この 


DOS コールで は 必要 あ り ません。 

常駐 プログラムの サンプルが リ スト 1 で 
す。 エディタ を 使って 人力， アセンブル， 
リンクして 実行 町 能 フ 7 ィルを 作 ります。 
実行の 前に CTRL + F7 を 2 回 押 し て, 画 
面に, 'I 1 , ている ファン クシ ヨン キー 表示 を 消 
します （こうしな いと' Ji 行 結果が わかり づ 
らいから です）。 実行す ると Human68- 
- --, と 表示され るでしょう。 文字の 色が し 
だいに 青み を i« していき は つ iY に な つた か 
と 思 う と ， 今度 は 逆に 淡 くな つてつ いに は 
兄 えなくな つてし まいます。 すると またも 
や 青み を 増して くる。 この 動作 を延々 と 繰 
り 返す だけの プログラムです。 

プ 口 グ ラ ム が 常駐 している の を 確認す る 
に は， システム ディスク （ Ver.2.0U 降） 
の BIN ディ レクト リ にあ る PROCESS を 
'Jii ずします。 常駐して いる プログラム は K 
EEP と 表示され ます。 

こ の プログラム は 常 ft}: 部分 と 非 常駐 部分 
で 構成され ています。 ft 駐 部分で は パレ ッ 
ト の 変更 を しています。 非 常駐 郁 分で は H 
uman …… を 表示し, i 直 同期 割 り 込みの 
設定， プログラムの 常駐 JitfflU ラベル skip 
以下 5 行 です） をし ます。 


こ こ では 常 St© 囲 を init — start を 計 « し 
て 求めて います 力 f , 私 だっても つ と 簡単に， 

move.l #init- start, - (sp) 
と 書きたい のです。 しかし， 初期 型 同 機の 
AS. X では ^ します。 こ の ま: き 方 で 
は irt: 後に ソース リストに ない コー ドが 2 
ワード （ィ ミディ エイ ト データの 依が そつ 
く り そのまま） ffl! め 込まれて しま うのです。 

そのほかに プログラム を 常駐させる と き 
に 注意して おきたい こ と をい く つか 挙げて 
おきましょう。 

いま ま で 特に 触れ ませんで し た 力 } , DOS 
コール $ FF31 で; お « す る こと ので き る K 
囲 は, プロ グラムの 先頭 か ら 引数 prglen バ 
イト 分です。 そういう わけで， プログラム 
を 組む と き はまず 常駐させる 部分から 書き 
始める のが 私の やり方です。 し 力' し， 実行 
は 非 常駐 部分の init 力' らしなくて はいけ ま 
せん。 それに は i も 終 行の. end に 絞け て ink 
を 桁' ぶ します c こ れで' お 行ァ ド レ ス が init 
にな り ます。 

プロ グラ ムを 組む 場合 ほ と ん どの 入が メ 
ィ ン Sit 瑰ゃ サブルーチン 群 を 荊- f- に， ヮ一 
クゃ データ を 後半に;? i いてい く と 思います 
力 1 , 駐プ ログ ラム で 使 う ワーク や データ 



* sample 1 

—EXIT: 
KEEFPR: 
B PRINT: 

"VDISPST: 


SffOO 
$f f31 


lea . 1 symdata t a 1 
moveq SYMBO し, c 


ク幽 Iffi を 
表示す る 


を 表^す る 


'が 使えな 1 


_ (あ、 し ET: 
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. text 
. even 


movem . 
move . k 
move . w 
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uubq . w 
cmpi . w 


and i . 
move . 
move . 


|)H 1 p t 
flag 
pal 2 


pa 13 
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mes 1 : 
mes2 ： 


move . w 

#1 *25B + 2 ,dl 

mo vp . 1 

*_VDISPST,dO 

trap 
tst . 1 

d0 

beq 

skip 

lea . 1 

mes 1 , a 1 

move . 1 

# B PRIST, dO 

t rap 

«15 

dew 

_EXIT 

clr .w 

- ( sp ) 

move . 1 


w 


move . 1 

dl ,-{sp) 

dew 

_KEEPPR 

lea , 1 

mes2 , a 1 

moveq 

ゾ 


_EXIT 

dc.b 

' 垂 商 m 期 w り 

dc.b 

'グラフィック 


if J り 込み i5 定 

别り 込み か 使用 中 

メッセージ を 表' 示 
^駐 せずに 終了 

start 力、 ら init ま で 
を 常 K させて 
終了す る 


は 使用 不 i 


； です ■ 


(spl+.dO-d 
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ここまで が S H し 


ここから が 非^ Kt I 


車" 
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は' おも r: プロ ダラ ム に 続 く よ う に^いて く だ 

さい （サンプル では palet, flag が 常駐す 
る ワーク）。 こうしな いと ワーク や データ 
の 常駐が で き なくなって しまいます。 

同 じフ アイ /レが 何個 も 常:, ザ きて しまう 
こと も ありがちです。 それ を 防ぐ に は 実行 
する ファイル^と M じフ アイ ル 名の プロ グ 
ラムが， メモリ にある か 調べれば い 
いのです。 それに は メモリ 管理 ポインタ を 
遡って フ アイ ルを 検索 照合 すれば いいので 
すが, たいてい 6, 7 文'] " : の ファイル 名 力 ？ 
つけられ ている こ と もあって， 照^す るに 
はちよ いと 而 倒です。 そこで 考え ら れた の 

が プロ グラ ムの先 婭 に ヘッダ をつ けて， そ 
れを 検^. ^していく 方法です。 ヘッダ を 
半角 4 文字に してお けば， 1 ロング ヮ一 ド 
の 比較です むので， ずいぶん と 検索が 楽に 
なります。 

これ を プログラム にす るに は メモリ 管 邵- 
ポ イン タの知 職が 必要 不可欠です 力' ら ， 簡 
単に 触れて おき ましょう。 

自 分 自 身の メ モ リ 蕾理ポ インタ は 起動 直 
後の aO レジスタ によって 示されて い ます。 
ひとつ 前 の メモリ ぉ：现 ポ インタ を お I るに は 
aO レジスタ を 使って， 

movea.i (aO),aO 
と します。 aO レジスタ が 0 な ら これよ り liij 
に メモリ^ Pil ポインタはありません。 プロ 
ダラ ムの 先^ は メモリ 管理 ボ ィ ン タ +10()ii 
です。 つまり， 

lea.l $100(a0),at 
と す れば， al レジスタ にプ 口 ダ ラ ムの 先頭 
ァ ドレスが 人り ます。 

あと は a 1 レジスタ とへ ッ ダを 比敉 し て 
一致す れ ばす で ( ： ；お駐 している のです かに 
メ ッ セージ 'を, 屮, 力 して 終了 させれば いいで 
しょう。 この ヘッダ チェック 部分 をプ ログ 
ラムに す ると 次の よう にな り ます。 
headendc.b 'X68K' 
* これより 非 常駐 部 
check: movea.i (aO), aO 
tst.l (aO) 
beq 常駐して いない 
lea.l $100(a0) f al 
move.l (al) ,dl 
cmp.l header, dl 
beq すでに^ 駐 している 
bra check 
2 ]'\\\ は aO レ ジ ス タカ f 0 か ど う か チェ 
タクして いる のです が, 実際問題 として 自 


分 と 同 じ プ 口 グ ラ ム が IOOOOh よ り 若 i 、 番地 
I ： * 駐 している と は 考えられません。 です 
から， 

cmpa.l #$100()0,al 

bcs 常駐して いない 
と しても 問題 はない と 思います。 

紹介した サンプルに は ヘッダ も ない し， 
ファイル 名の 検索 も していません。 サン プ 
ル では 垂直 同期 割 り 込みが 使われて いれば 
常駐 しないよう になって います。 自 分 自 身 
が 垂直 同期 割 り 込み を 使って いる ので こ れ 
でい いのです （手拔 きかな）。 

常駐 プ 口 ダラ ム に は 割 り 込み 処现 やべ ク 
タの 変更が ついて ま わります から， こ れ ら に 
ついて も 話さない わけに はいき ません。 割 
り 込み を 使う に は IOCS コール を 利用 し ま 

す。 注意 して ほし いのは 割 り 込み^ 现の前 
後で レジスタ の 値が 変わ ら ないように する 
ことです。 サンプル でも レジスタの 保 1?- を 
している のが わかる と^います。 
割 り 込み を 利用 し て プロ グラ ム を 呼び出 

したと き は， rts ではな く rte を 使い ま す。 
M り 込み は 何^ 類 も ある ので ひ とつず つ 説 
I リ 1 してい く スペース は あ り ません。 ぜひ プ 
ログ ラマーズ' マニュアル な ど の 参考 资枓で 
調べて みて く ださい。 

次に, ベクタ を 変お する^^です。 べク 
タを 書き換える といろ いろと^ しい こ とが 
できます。 昔， 孃脳 倶楽部に あった ゲボボ 
ディ スクを 党-えて いる 入 も 多いで しょ う。 
あれ は ディ ス クのィ ジェク ト^ 係の 別 り 込 

みべ クタ を 変 ui した ものです。 ベクタの 変 

01 は DOS コ 一 ル$ FF25 ( _INTVCS ) を 使 
つ て 簡 にで きます 力- 不必 ^にべ クタ を 
翁き 換える こ と は システムの 破壊に もつな 
がるので， 自信の ない 入に は あまりす すめ 
られる もので は あ り ません。 

さて， ここまで プログラム を' おも もさせる 
こ と に 夢中 になって いまし た。 紫駐で き る 
ように な つ た ら 解除 もで きる ようにし なく 
て は に丁-落 ちです。 これに は DOS コ一 ノレ 
$ FF49(_MFREE) を fOi い ま す。 

move.l memptr,-(sp) 

dew $ff49 

addq.l #4， sp 
上の ように 使います。 memptr に は 開放し 
た い プロ ダラムの プロセス f 《り' R ポ インタ を 
指定 します。 待 通 は 常駐 プロ グラ ム を 解除 
するとき は スィッチ を 衍^ し て 行 うように 
I なって いる ものが 多い のです が， こ こて' は 


ffi 略 化して 説明し ま しょう。 

'Jt i 二 紹 介した ヘッダ チェック プロ グラ ム 
を 使つ たと しま す。 すでに 同 じ ^駐 プロ グ 
ラムが^ /|:. している 場^ は ラベル 「すでに 
^駐 している」， に 分岐し ます。 そのと き 
の al レジスタ はすで. に 常駐して いる プロ 
グラムの 光^ アドレス をポ しています c こ 
れょ りフ。 ロセス ぉ：理 ポ インタ は F0 h liij に あ 
り ますから， 叶算 によって 简 単に 求める こ 
と がで き ま す。 割 り 込み を 使つ てい る ；お 駐 
プ 口 グラ ム の 場合 は, 割 り 込み を 禁止す る 
こ と を 忘れて はいけ ません。 「おかしな 命 
令 を 実 行 しまし た」 な んて メッセ一 ジが出 
て しまい ますよ。 

これで プログラムの^ 驻と 解除の 方 は t 二 
ついて わかっても ら えたと 忍い ます。 XI 
で W じょうな こと をす るなら， LIMIT で 
マシン a は 城 を 確保 して， そこに 常 駐 プ 口 
ダラ ム を 置いて お く だけです。 割 り 込みの 
設定 は Z80 でも けっこう 人 変な ものが あ り 
ま すが， X68000 では プロ セ ス' 1ゃ观 や メ モ リ 
管理の 話が 絡んで く るので 相当 難し く 思え 
るか も しれません。 世に はいろ いろ と 常駐 
ゾフ トが ，屮ぁ! つてい るので， デバッガで 他 
入の プロ グラム を 解析して みるの もい ぃ勉 
強 （1れ' 勉強になる" J" 能 性 も ある） になる 
かも しれません。 OWX にも OPMD などの 
^駐 プ 口 グ ラ ム が ゾ一ス リスト で 公開 さ れ 
ている ので， それら を 参 やにす るの もい い 
でしよう。 （；ぉ 山裕昭 ） 

質問に お答えし ます 

曰 ごろ 疑問に 思って いる 二と， どんな 二 
とで も 結構です。 どんどん お便り く ださい。 
難問， 奇問， 編集 室が 総力 を 上げて お答え 
いたします。 ただし， お寄せい ただいて い 
る ものの 中には， マニュアル を 読めば すぐ 
に 回答が 得られる よう な もの も 多々 ありま 
す。 最低限， マニュアル は 熟読して おき ま 
しょう。 質問 はなるべく 具体的に 機種 名， 
システム 構成， 必要なら 図 も 入れて こと 細 
かに 害いて く ださし、。 また， 返信用 切手 同封 
の 質問 をよ く 受けます が， 原則として， 質 
問 に は 本誌 上で お答えす る ことにな つてい 
ますので ご了承く ださいつ なお， 質問の 内 
容 について， 直接 問い合わせる こと も あり 
ますので， 電話番号 も 明記して く ださいね。 
宛先 ： 〒108 東京都 港 区 高 輪 2-19- 13 

NS 高 輪 ビル 
ソフ ト バンク 株式会社 出版部 
「Oh! X 質問 箱」 係 

Oh!X 質問 箱 167 




いま はすつ かり 夏休み。 外で は 暇そう な （単なる ひがみ）。 まあいい か， 会社に い 
子供た ちが 走り回り， どこへ 行っても 人 れば 涼しい し。 しかし， それで は あまり 
ばかり。 こっち は 仕事 だとい うのに …… にも 悲しい ので どっか 行こう かな。 


梅津 信 幸 （18) 京都府 
いいな あ， 部^に ものが いっぱいあって。 
♦ ある 日， 学校の 図 害 館で 僕が 「なんで ここに 
は Oh!X がな いんだ j なんて ひとり 言 をい う と 
横にいた 友人 K が 1 " あつ。 という こと はお まえ 
持って るの か」 と 聞いて きた。 もちろん 
X68000 のこと だと 思って 「持って るぞ」 「お ま 
え も か！ やっと ユーザ一 が 見つかった」 と， 
しばらくの 間， 2 人 はとても 喜んだ。 2 人と 
も 初めて 同じ ユーザ一 が 見つかつ たの だから。 
しかし， 「おれ ドラス ピ 持って るから 何かと 交 
換 しょう」 と 言ったら， 「へ？ それ X68O00 だ 
ろ。 なんの こと だ。 おれ X は urbo だ ぞ」。 その 瞬 
間 2 人 は 白髮と 化した …… 。 という わけで 
X68000 は ユーザ一 が 少ない c カナシ ィ …… c 
福 井 達 也 （16) 滋賀県 
そ ん な に 悲観す る は ど X68000 の ユーザ一 
が少 ない と は 思 わない ん です けど。 出 荷 台 
Sic も 10 万 台 を 突破した こと だし。 まあ. こ 

れ からどん どん 出会う ようになる でしよう。 
♦ 天 王 寺 公園が きれいに なって いました。 編集 
室に は 関西 出身の 方が 大勢い ると 聞きました。 
大阪 出身の 方で ぉ湓 休みな どで 帰省され る 方 
は I 度 行って みると 涼が とれて よいと 思い ま 

すよ。 入園料 は 150 円です。 

鯛 富 之 （28) 大阪府 
8(1 に 脚 西 出身 は大势 いないんで すけ ど …… 。 
まあ， 僕 は大阪 出身な ので 暇が あれば 行つ 
てみ ます。 

♦ この間， あの 「X68000 ステッカー」 を 買って 
きた。 何に 貼る のかって一 と， 学校の ゲ タパ 
コ のく つ を 入れる 口 ッ カーに 貼る ので ある。 
うお 一， 目立つ 目立つ （カツ コ いい！）。 

清水 了 （16) 大阪府 
そんな と こ に 貼らずに おでこ に 貼る とかし 
たら もっと U 立つ かも しれない。 
♦ う ちの 卓球 部で は 国体 予選で 落ちた ので みん 
な スポーツ 刈 りに する ことにな つた。 夏は坊 
主 頭で 過ごす よ。 高撟 政考 （16) 宮城県 
いいな あ， 涼しそう で。 でに 坊主頭に す 
る 気 は 全然ない けど。 
♦ 今春， うまい ことに ある 外資 系の 会社の 研究 
室に 潜り込ん だの だが， 毎日 英文の レポート 



令徹 夜明けに YET を 3 回 やって 学校へ 行く。 JR 

の 中で 上から 3 色の ブ ロック が 。 "ちゃ ら 

らん》", はつつ。 目が 覚める と 私 は 終点 門 司 
駅。 その 日 私 は I 限 目に 間に合わず， 学科の 
全 28 名に 大笑いされ …… 。 また 今日 も 徹夜 明 
けに YET を 3 回 やって。 レポートの 山に 泣い 
てんだ よお ぉッ！ 岩瀨 貴 代 美 （18) 福岡県 
よ かつ た じ や ないです か。 終点が 一応^ 岡 
県内の 門 司 駅 だつ たんた' から。 もしそう で 
なくて， そのまま 関鬥 トンネル を 通って 山 
1 1 M の— ド関 ま で 行つ てし まったり したら， 
も う 大変 （そんな 屯：' お はない のか も しれな 
い）。 

♦ 17 歳のと きに 兄が 買った ファ ミ コンが ゲーム 
との 出会い. ゲームの 世界に のめり込んで， 
はや 7 年。 24 にもな つて 二ん な 二と をして い 
ていいんだ ろうかと 思う 今日 この頃。 すべて 
の ゲームが 面白い と 感じた あの 頃に 戻り たい 
と 思う 私です。 大吉 千 恵 子 （23) 茨城県 
あの 頃に 戻りたい というの は， ひょっとし 
て 初心に 炅 りたい という 理由で はなく， 若 
返りたい という ことなの だろう か …… 。 と 
ころで， どっちの 年齢が 本当なん です 力'。 
♦ 初めて Oh!X を 読んだ とき， はっきり いって ま 
るで わからなかった。 2 冊 目 …一 ， やっぱり 
わからなかった。 3 冊 …… ， 4 冊 …… ， ずつ 
とわから ない まま？ …… グ スン。 と 思いき 
や この頃 少〜 しわ かるよ う になって きたみ た 
30 のね一 ちゃん （未婚です のでおば さん 
と 呼ばない ように！） になって からで も， お 
勉強って でき るんで すね。 がんば！ Oh!X さ 
ん， 二れ から も どうぞよ ろしく 

竹 内 夕 起 (30) 静岡県 
いえいえ， こちら こそよ ろしく お願いします。 
ほかに も 内容が わからない 人 もい るかと 忍 
いますが， いきなり^ 部 を 理解し ようとせ 
す' この 力-のよ うに のんびり とわ かる と ころ 
を 増やして いけば いい じ やないです 力 1 。 
命 主人の コンピュータ でゲー 厶を する だけ な の 
で， 7 月 号の 特集 さっぱり わかりません でし 


た。 ごめんなさい。 岩 崎 利 香 （20) 大阪府 
いえいえ， 说ん でいた だく だけで 大変 光栄 

です。 

'この ハガキ を 7 月 I 日 以降に 出す とソフ トメ、' 
ンクに は 届かない のだろう 力、。 

山 崎 幹 生 （16) 新潟県 
いえいえ. ちゃんと W きました よ。 鄞便^ 
さんが $云 送して くれます し。 送と いって 
も スター ト レックみたい なやつ じ やない よ 
(そんな こ と は 皆さん JE 々ご 承知）。 
'私 は 某 予備校の 効きす ぎる クーラ一 のせい か 
最近 体の 調子が よくありません。 編集 室 は 適 
温です か ？ 田舎の Pure な 空気と う ちわで 健 
康を 維持し タメになる 記 車 を 害き 続けて く だ 
さい。 上 原 拓哉 （18) 滋賀県 

僕の 出身地 は大阪 だか ら， 空気 はそん な に 
きれいじゃありません …一 。 でも， 田舎つ 
ていいです よね。 
'私の 部屋の ディスプレイ CZ-600D に は， RF 端 
子で ファミコン 力 <， ビデオ 入力 端子に は メガ 
ドライブが， デジタル RGB に は XlturboZ が， そ 
して アナ 口 グ RGB で X68000EXPERT II がつな 
がって いる,， いや あ， CZ- 600D つて 本当にす ご 
いです ねえ。 デザイン もい いし。 
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を 読ま なきやな らんこと になって しまつ た。 
強制的に 英会話の 力 リキュ ラム を 受けさせら 
れる わで …… 。 英語なん て ど わい キラ ィだぁ 

〜。 うつうつ 家に 帰れば X68000 の コマンド は 
全部 英文 だし ィ〜。 ん〜 ん ！ 

原 田 真 志 （19) 静岡県 
il "^系と いう とマク ドナ ル ド かな ？ それ 
とに ケンタッキー フライドチキン？ （決 
して パ 力に している わけで は あ り ません） 
♦ 労災で 骨折して， はや 3 力 月。 会社に も 行け 
ない， 友人に も 会えない： まして や， 彼女 も 
いない 寂し さから， つい X68000 を 買って しも 
うた …… 。H ソフ ト ばつ かやつ てる 毎日。 二の 
ままで はいか一 ん！ 比 企 野 一雄 （25) 静岡県 
本当に その ま まで はいか一 ん。 
♦X680C30SUPER- HD の 最大の 目玉 は 丹 氏が 書い 
ている ように 「SCSI」 の 標準 装備であろう。 し 
かし， 問題が ひとつ 潜んで いる。 SCSI は 世界 共 

通 規格で あるので 他社 製の 周辺機器 を 使える 
ようにな るの だ 力、'， チタン カラーに 合わせた， 

さらに マンハッタン シ； E ィ プに 違和感の な い 

デザ ィ ンの 機器が シ ヤー ブ 以外 か ら出 るの だ 
ろうか？ 外付け の ハー ド ディ スク のとき も 

こだわ りの X ユーザ一 と して 抵抗が あつたよ 
うに 思う の だが。 山 本 雅昭 （34) 神奈川県 
う一 ん， h 分で 色 を 塗る しかない かも しれ 

ない。 

♦ 編集部の 皆さん， こんにちは。 僕 はい ま 目が 
回る ような 感動に 震えて います。 Oh!X のお ま 
け ディスクに 入って いた 「OPMD」 を 使った か 
ら なのです。 実は， 以前に 打ち込んだ Oh!X 
Live in '90 の プログラムが サンプリングと 同 
期されて バ カス コと スピーカーから 流れて き 
た ときには 涙が こぼれそう でした。 誰し もが， 
「なんだい まさら e こり や！」 と 思われる で 
しょうが， 本人 は そ う 思われて も 平気な く ら 
いに はしゃい でます。 うう う -"… 。 Oh!) (さん， 
ありがとう ！ 森 田 宣幸 （19) 宮城県 

なんた' いまさら。 こり や！ （とかいったり 
して） 

♦ いまさらながら， X68000 の 冷却 ファン はうる 
さい。 せめて 30 分 動いたら 5 分 回る というよ 
う にならない もの か。 昔， PC- 880lmkH モデル 
30 のとき は ディスプレイ 付きで 4 万円だった 
の をい いこと に， 冷却 ファンの 配線 を 外して 
使って いた もの だ。 通気孔に ガムテープ 貼つ 
たり もした 3 でも， ぜ〜 ん ぜん 壊れなかった。 
まあ， X68000 は プラスチック 製で いかにも 壊 
れ そうだし， 値段 も 張る ので 無茶な こと はや 
めて いるが。 三 宅 宏典 （17) 岡山県 

たぶん， やめた ほう 力 U' い と 忍い ます。 

♦XI40 という 雑誌 を 見つけた。 だが， 実は Oh!X 
が 逆さ ま にな つ て いる だけの 話だった。 

西 本 圭輔 （15) 東京都 
しかし， 淮 が 逆さまに したんだろう。 

♦ とうとう 親に 無断で X68000PRO を 買って しま 
つた。 早く C 言語 を 覚えて ナイ トス トライ 力 
一 や メタル サイ ト を 超える 3D シュ一 ティン 
グを 制作したい。 しかし， 現実 は ゲーム セン 



タ一 となりつつ ある。 はたして， 元 を 取り戻 
すに は ソフト を 作って 売る のと， 友人に ゲー 
ムの ブレイ 料 を 請求す るのと では どっちが 早 
いだろう か？ 沢 井 博 （20) 宮城県 

はたらけ 一。 

♦ どうかお 許しく ださい。 私 は あやまって Oh!X 
7 月 号 を ある 雨の 日に 地面に 落と してし まし、 
ました …… 。 おお！ せっかくの 純白が 汚れ 
てし まった。 森 義徳 （24) 大阪府 

まさ 力'， わざと じゃあないで しょうね。 

♦ シミュレーション ファンと して は 戦争 もの 以 
外に も 何 か 出て ほしいで すね〜。 X680M 用で 
もい いから スポーツ 関係で 何かないで すかね 
〜。 アメフト とか ラグ ビ一， ラクロス， ォ 一 
スト ラリ アン フットボール などなど。 し 力、 し， 
ルール を 知らない 人が 多い から 売り に く いか 
も。 ゴルフ ゲーム を 二れ 以上 リアルに する に 
は 経験 を 積まなければ 場所に よる 風の 違いが 
わからな くす ると か， 自分の 打つ 前に ライ バ 
ルがバ 一ディ を 決めて ブレ ッ シ ヤー を かけて 
く れ ると かいうの もい いん じ やないで しょ う 
力、。 山 田 和 志 （21) 奈良県 

スポーツなら， やっぱり イン ディア 力と 力' 
を 出す と いいん じ やないで しょ う 力'。 

♦ 透視力の 話が 出ました が， たとえ 透視力が 使 
える ようになった としても ピン ト 合わせが 難 
しいので はないで しょ う か ？ だいたい 服な 
んて I cm もな いんです から 透視し すぎて 2 
cm ぐらい 奥 を 見よ う もんなら， 体内の 内臓と 
かが 見えて しまう と 思 うんです けど …… 。 ま， 
医者に とって は カラ 一版の X 線 写真 と し て 使 
えて 便利なん でしよ う けどね …… 。 

佐々 木 美武 （17) 富山県 

あ一， 想像す る だけで も！ a 持ち 悪い。 
♦ ひと り 暮らし をす るよ うにな つて 明け方まで 
パソコン を やる 日々 が 続いて いる。 普通 は 体 
を 心配す るが， 僕 は 電気代の ほうが 心配で あ 
る。 ノ、。 ソコン つて 電気 食う のかな あ。 

河 野 英士 （19) 愛媛県 
そ ん な に 電^ は 消费 しないと 忍 います 力す。 
^は 夜食 代 と かの ほ う が 多かった り し て。 
♦ 「ソフ ト バンク （株）」 へ 社名 変更 並びに 新 社 
屋 完成お めでとう ございます。 しかも， まつ 


たく もってお めでたい ことに 私 は 第 I 種 情報 
処理 試験に 合格 しました。 月 刊 情報処理 も 買 
つてた だけで 置きつ 放し だ つたの だが … … 。 
午前 問題で 出た RISC と 力、 TSS とか は Oh!X で 仕 
入れた 知識で いけ ましたが， 問題 は 関連 知識 
の 選択！ 数学と 英語から 4 問 取って あと I 
問， 工業から 取る つもりが 答えが わからな く 
て その 場で 金融に 変える という …… _， よかつ 
た， 共通 I 次の 倫理 政経 を 3 回 も 受けて おい 
て （笑）。 さあて， 次 は オンライン だ！ 

広 瀬 拓 (21) 京都府 

僕 も 共 A 1 次 は 3 回 受けた け ど， あん ま り 

役に は、'/: つて いないよ うだ。 
♦ 大学で 中国語が 第 2 外国語の 中に 入って いる 
だ ろう 力、'， 「中国 語 は 簡単 だ」 なんて 思って い 
る あなた ！ それ はとんで もない 大間違いで 
あ 一る。 中国語 はと一 つても 面倒臭一 くて， 
いやになる 言語で ある。 夏休みに 中国語の 大 
変な 課題が 出た！ うわ 一， 泣けて くる。 ト 
ホホ。 小 野 寺 光 （20) 宮城県 

ドィ ッ』 おも フランス語 も iAi 倒 臭いよ一 ん。 

令 暑中お 見舞い 申し上げます。 東京 は 水 不足で 

大変 だそう です ね。 水がなくて Oh!X が 発売で 
き なくなっても いいです から， 無理し ないで 
ください。 谷 野 育規 （18) 和歌山県 

はい。 

♦ そ 一か， そ一 だった のか。 いくら 送っても 採 
用され ない と 思って いたら， 僕が 送った ディ 
スクは フォーマットされ ていたの か …… 。 も 
うこうな つたら 仕返し だ。 もし プレゼントの 
ディスクが 届いたら フォー マツ ト して 使って 
やる ！ 曽我部 恭昌 （ほ) 富山県 

そんな こ と言うん だったら， プレゼント 当 
てて やん ない も 一ん （子供の ケンカ 力'）。 
♦ 編集 室へ 届いた フロッピー を I 枚に つき， ノ 
—ブランド 50 円， ブランド 品 100 円で 買い ま 
す。 10 枚 セットなら Z80A に 4.7kf2 の 抵抗 3 本 
を 付けて 交換し ます。 いや， たまたま 机の 上 
に 転がって いた もので …一 。 ゥソ だよ一！ 

白 井 亮 （17) 神奈川県 
今） J v から 説んだ 人 はこの 2 通の ハガキ が 
なんの こ とだか 令然 わからな いんだろ う な。 
♦ 今度 ひと り 暮ら し を 始めよ う と 思う のです 力 ( , 
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現在 ひと り 暮らし をして いる 人に M き ます。 
だいたい I 力 月い くら ぐらいで 生活で きる の 
でしよう か。 井田 奨一 (22) 東京都 

そ れは その 人の 育つ て き た 生活 レベルに よ 
つて かなり 異なります。 贫乏 な^らし をし 
てきた 入 は 安くて 済みます が， '康 勢な 暮ら 
し をして き た 人 は 何百 万 も かかる かもしれ 
ない。 

♦ 大学の 研究室で 使って いる PC-980IVX のハ一 
ド ディスクが 死んで しまった -"… 。 壞れ たと 
いう 話 はよ く 聞いて いま したが 自分のと ころ 
へ番が 回って くると は。 あ一， 自分の X68000 
のでなくて よかった （といいつつ も靑 くな つ 
て バック アツ プを 取つ た 私で した）。 

広瀨 真 二 (2め 東京都 
番が 回って き ません よ う に …… 。 
♦Oh!X は 若い 読者ば かり でな く ， 高年 齢 者 も 読 
んで いる 二と を 知って く ださい。 

合 原 宏 （61) 千葉県 
いえいえ， ハガキ を 読んで いる と 高年 齢 
も 紡 構いる こ と に 気づき ますよ。 
♦ 4 月に 大学生に なって 6 月より バイ ト代 をす 
ベて 預金して おります 3 計算す ると I 年後に 
X68000 SUPER- HD が 買える 予定。 あくまでも 
計算 上で あ ると ころ が悲 しい。 

小川 佳昭 （19) 東京都 
叶笫 す る と 200 万年 後ぐ ら い に 都内に 家が 
買える 予定。 
♦ 今日 (7/8), 昼前に NHK を 何気なく 見て いた 
ら， いきなり ソ一 サリ アンの エンディングが 
流れて きた （たぶん そうだと 思う）。 ァザ ラシ 
が 泳いで いる シーンだった。 NHK でも ゲーム 
ミ ュ一 ジック を 使う のかと 驚いて しまった。 
宮岡 二 幸 (23) 千葉県 

ふ ― n, o 

♦ 現在 私の X68000 は イカれ ています u 電源 を 入 
れ ると OS とか ゲーム は 走 るんだ けれど， 画面 
が ウルトラ Q してし まいます。 PC- 8801 をつ 
ないで みたら 異常ない ので イカれ ている の は 
X68000 本体の ほう だと 思う。 そんな わけで 私 
は 毎日 祈る よう にして スィッチ を オンに して 
います （早く 修理に 出せば いいのに ね）。 

新 帯 達 哉 （19) 愛知県 


いいな あ， ウルトラ Q がいつ でも 兄ら れて 
(そ 5 いう 問敏 に やな一 い）。 
♦ 美しい もの は やっぱり 自然に 生きる 生物 だと 
思う。 表紙に は アツと 誰もが 思うよう な 生物 
の グラフィック を 載せても らいたい。 いま ま 
での 表紙 は 世の中 や 社会に 攝 いて 捨てる ほど 
あるよう な パターン ばっかり。 うんざり。 う 
ん ざり。 も一 いや。 やめて。 心が 乾く。 潤い 
を ！ 新 畑 賁史 （19) 広島県 

そうです よね。 ォコゼ と 力'， チョウ チン ァ 
ンコゥ と 力'， ナ マコと か， サナダ ムシと か， 
自然に は 美しい ものが いつば い （僕って や 
なやつ でしよ）。 
♦X68000 の ウィルス で大騒 ぎして ましたけ ど， 
Macintosh では 日常茶飯 車の ようです。 ゼミの 
予習で 使って いたら 画面に 死神が 出て き ま し 
た。 ゼミ は 明日 だとい うのに。 誰か 私の 予習 
ディ スクを 元に 戻して く ださい。 

加 膝 弓弦 (22) 大阪府 
じゃあ， あなたの ディスク を 元に， つまり 
't-: ディ スク に^して あげ ましよ ラ。 
♦ マシン 語， CG, ハ一 ドウ： l ァ 工作。 やりたい 
こ と はた く さ ん あるのに なかなか 手が 出ない。 
いままで ヒ マがない からで きないと 思って い 
た 力 ; ， もしかしたら， そうで はない ので はな 
いか。 足りない もの， それ は r 締め切り」？ 
村 尾 遊 （26) 岡山県 
r 締め切り j が あるから といっても， なか 
なかで きない こと はよ くあります （経験者 
は 語る）。 

♦ ついに X68000 を 買った。 想 勦！ ちなみに 二 
いっと MZ-2500 が 6 畳一 間の 部屋に 並んで い 
る さま は なかなか 壮観です。 なんと 情報処理 
の I 種に 受かって しまった。 感激 ！ と 幸せ 
いっぱいの 日々 を 送って いる 最近の 私です が， 
さすがに X68000 のン+ 万の 借金 はつ ら い 
…… 。 中 村 祐一 (20) 東京都 

楽 あれば^ あり。 起きて 半畳， 崧て 1 畳。 

♦MIDI ポ一 ド 買った けど， 音源まで 金が 回らな 
いという 間抜けな あなた （んな 人 はいない つ 
て？）。 口一 ランドの 「DR-550 (32， 000 円） j 
を 買いなさい。 これ は ドラム マシン （いわ ゆ 
る ドン 力 マって やつ） だから， 当然 ドラムの 



音し か 出ない けど， これで スーパ一 ハング ォ 
ン やった 日 にゃあ， も一 最高です つて ！ But 
モ トス だと 間抜け だけれ ど …… 。 

野 田 敏之 （19) 神奈川県 

だ そ一 です。 
♦ この間 読んだ 新聞に よると， 2030 年頃に は 平 
均 気温が 温室効果で 2 〜 3 度 上がる そ う ナ" 
そして， 夏 はい まよりも 猛暑で 天候 不順に な 
ると いう， となると パソコンに は 辛い 二と に 
なる の は 間違いな いわけで， 熱と 雷に 対する 
方法 を 何 か 考えねば！ （全国の 皆さん はどう 
している のだろう？） 岡 部 誠 (25) 福井県 
それよりも クーラ一 を 待って いない 入 （つ 
まり， 僕の こと） に 辛い こと は 問^い ない 
わけで， それに 対してい い 方法 を やえても 
ら わねば！ えつ， クーラ一 を 買えって？ 
そり や， もっとも。 
♦ この 夏， ロシア語 聴講 者と 講師で ソビエトに 
旅行に 行く はずだった。 でも， 貯金が 足りな 
かった ので あきらめた。 いまにして 思えば 
X68000 を 担保に してで も 行って みたかった。 
トホホ …… 。 神 生 直敏 (20) 栃木県 

う 一ん， ソビエトに 行く と 涼しい かもしれ 
ない な あ。 

♦ 大学生って 忙しい もの だつ たんです ね。 クラ 
ブ 活動， コンパ， ボウ リング， ハイキングに 
キャンプ， 自動車学校に アルバイト， これに 
パソコンが 加わる とまさに 体が 2 ついるな あ。 
なに ？ 勉強？ テス ト 直前まで 忘れて いな 
さい， そんな もん は。 越智 一秀 （19) 広島県 
はい， 私 も テスト 直前まで 忘れて いる はラ 
でした。 別に そんなに 忙しい こと もなかつ 
たんです が。 

♦ 6 月 9 日 （土）， ビジネス ショウで 見た PC-286 
Book の コマーシャルが テレビで 。「あれつ， も 
う 売り出し ていたの か」。 6 月 II 日 （月）， 会 
社が 暇な の をい いこと に 抜け出して 秋 葉 原へ。 
ああ， ついに PC-980I 互換 機 を 買って しまつ 
た。 ゲーム を やりたい ばっかりに！ 遇 かな 
るォ一 ガス 夕 を やる。 うん， 速い。 ポピ ユラ 
スを やる。 反応が よい。 ソ一 サリ アン を やる。 
音が さみしい …… 。 しかし， 4kg を 超える とや 
【まり 重い。 AC アダプタ や フロッピ一， マウス 
なんか も 持って いかな く て はならん となると 
つらい。 で， 今週 は 会社に 置きつ 放しな の だ 
つた。 ゲーム をす るた めに 買った のに， 実は 
仕事に 使って いる。 X68000 のとき と は 逆 だ。 

森 啓泰 (23) 東京都 
今週 だけでなく， ずっと 仝ネ h におき つ 放し 
のよ う な^もす る。 
♦X6800 の 100 万 台 突破の ために も， これから も 
ガンバ ッテ く ださし、。 X6800 が 国民 機になる 
日 も 近い！ この 前， 伝言板に X6800 の パン 
フレット を 貼って 「二れ 買わ なきや 損する よ」 
と 害いて おいた。 木 下 剛 （16) 神奈川県 
あの 一， それ はいいんです けど。 X6800 じ や 
な く て X68000 なんです が。 まあ， よく ある 

IS 逸い つて やつです ね。 

♦ 7 月 号の 特集の 中の マルチ タスクへの 挑戦で 
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は 昔の 二と を 思い出 してし まい ま した。 7, 8 年 
前， 月刊 マイコンに MZ- 80 シ リ 一 ズ用 の 
MONIOS とかいう のの 記事が あって， 8253 を 使 
つた マルチ タスクのお 話で， 当時 MZ-80K2E を 
持って いた 私 は アセンブラで マルチ タスク を 
して 遊んだ ことがあり ま した。 

野 村 正文 （21) 茨城県 
マルチ タスクと いう と^ 徳 太子 （？ ）。 
♦ ナポレオンが 日本で 人気が あるよう に， 東郷 
平八郎 はフィ ン ラン ド では 人気が あるので す。 
理由 は東郷 元帥が いつも 自分た ちフィ ン ラン 
ドを しいたげ てきた 帝政 ロシアの パル チッ ク 
艦隊 を 日 本 海 海戦で 破 つたから です c 

新 熊 昴 （34) 大阪府 
とい ラ わけで， 7 J1' ふの 山 崎さん の 問 いか 
け に W す る お え をい ち ばん 早 く ^いて き て 
くれたの が このん-です。 ああ， ありがた や 
あり がた やと 思って いたら …… 。 
♦ たしか 日露戦争で 当時 世界 最強と 謳われて い 
た ロシアの バル チック 艦隊に 弱小 日本の 帝国 
艦隊が 勝って しまった という ことで， その 頃 
ロシアに 支配され ていた フィ ン ラン ドの 人々 
が 大いに 勇 気づ けられた。 という 二と なの だ 
そうです。 だから， 向こうで は 1 "東郷 のへ一 
チャン は 英雄なん だ！」 つて 高校の 時の 英語 
の 先生 （6? 歳） が 言って ま した。 

伊藤 義博 （19) 東京都 
♦ たとえ， いま ソ連が 変わって きたと いっても 
過去に 数え切れない 死傷者と 政治的 圧迫で 大 


ダメージ を 受けた トルコ， フィンランド 両国 
は 歴史上で ただ I 国 ロシア を 屈服 させた 日本 
の 東郷平 八郎を 称えて. それぞれ 彼の 像， 将 
軍ビ一 ルシ リーズと いう もの を 作って 心中う 
つ ぷんを はら している のです。 

上田 秀晃 （19) 福島県 

♦ いま を 遡る こと 85 年， フィンランド は 帝政 口 
シァの 支配 下に ありました。 し 力、 し， 日本海 
海戦で バルチ ック 艦隊 を東郷 平八郎 率いる 日 
本 軍が 破り， ロシア は 戦争に 負け， ロシア 革 
命が 起こり， フィンランド は 独立 を 勝ち取る 
二と がで きたので す。 フィンランド 人と いう 
の はなん と 義理堅い 人た ちで はあり ません 力、,: 
越智 亮 （17) 島根県 

命鲁 いてきた 人 も 多い かな ？ フィンランドの 
缶ビール は アド ミラ ル （将軍） ビールと いつ 
て， 東郷平 八郎が ロシアの 艦隊 を 破った とき， 
当時 ロシアに 苦しめられ ていた フィンランド 
がその 勝利 を 称えて 作った ものら しいです よ 
(山 崎さん への 回答 をす る 山 崎)。 

山 崎 勇 （28) 新潟県 

♦ 週刊 朝日 百科 「日本の 歴史」 （朝日 新聞社） に 
よ る と 世界 海戦 史上で 「The Battle of Tsu 
shimaj の 名で 呼ばれ る 日 本 海 海戦の 指揮官 と 
して 大胆なる 敵前 大回頭 をと つた 勝利の 見事 
さに よって， 東郷平 八郎は 「東洋の ネルソン」 
として 喧伝され た。 そのため， バイキングの 
故 地と もい うべき フィンランドで ネルソンと 
と もに 著名な 提督の 名 をつ けた ビールの 商品 
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名に なり， 現在 も 売られて いるそう です,， 

青山 和 広 （I 8) 愛知県 
と， このよう に 山の よ う な^ 郷 'に: 八 郎のハ 
ガキが 送られて きて （ここに^って いるの 
は そのうちの ごく- '部) ， iii 近 まで その H に 
来た ハガキ を统ん でい < と 必ず 何 通 か は 束 
«P 平八郎 に 開す る ハガキ を 1 1 に するとい う 
曰 々が 絞き ま し た (京郷 平 八郎の 5 文字が 
^にこび りついて 離れない よ 一）。 どうもた 
く さんの ハカ' キぁ りが と う ございま した n 
これで 山 崎さん も ぐつ す り と 眠る こ とがで 
きる でしよう （いままで もちやん と 眠って 
た？）。 


ぼくらの 掲不板 


参 掲載 ご 希望の 方 は， 官製 ハガキ に 項目 （売る '買う • 氏名 '年齢 • 連 

絡 方法 …一 ） を 明記して お申し込み く ださい： 

像 ソフトの 売買， 交換に ついては. いっさい 掲載で きません： 

搴取 リ 引きに ついては 当 編集部で は 黄 任 を 負い かねます,， 

參 応募者 多数の 場合， 揭載 できない 場合 もあります。 


| 仲 間 

★ X68000 ユーザーズ クラブ 「WATER」 では 第 2 次 
会員 を 募集して います。 今回よ り 「HYPER- 
SHAKEj という ディスク マガジン を 発行して お 
り ます。 X68000 を 持って いる あなた ！ I 度 連 
絡く ださい。 損 はさせ ません。 入会 資料の み 希 
望の 方 は 62 円 切手 を 貼った 封筒 を， ディスク マ 
ガ ジン を 見て みたい 方 は 400 円 分の 為替 を 同封 
のうえ， 下記まで ご連絡 を。〒 975 福島県 原 町 
巿 小川 町 I09-2 山 崎 潤一 （21) 

★ X68000 ユーザーの ための， X68000 ユーザーに よ 
る サークル r 兎団」 では ただいま 会員 を大 募集 
しています。 活動 は 主に プログラム や 情報な ど 
の 交換 をしたり， シ i ァゥ i ァ ソフトの 発表 を 
したりし ます。 合言葉 は 「打倒 電脳 俱楽 部」 で 
す。 やって みて 損 はあり ません。 詳し く は I20 円 
切手 3 枚 同封のう え， 下記まで ご連絡 を。 〒503 
-21 岐阜県 不 破郡垂 井町 宮代 2840- 1 田 川 和 
義 （16) 


| 売リ ます 

★ 力 ワイ Kl H ( 箱 以外 付属品 はすべ て あり， 新 同 
品） を RAM カー ド， ROM 力一 ドを各 I 枚 付けて 5 
万 5 千円で。 希望に よ り ソフト ケース （3 千円 
增)， スタンド （5 千円 増） も 付けます。 連絡 は 
往復 ハガキ で： 〒243 神奈川県 厚木 巿妻田 I, 
I58 そ り だ ハイツ 1,423 山野 和 也 （19) 

| 貢い ます 

★ MIDI 音源 口一 ランド 「CM-64」 を 6 万〜 7 万円, 
シャープ 「CZ-6BMI」 か 「SX-68Mj を I 万円以 
内で。 いずれも 完動， 箱， マニュアル， 付属品 
付き。 連絡 は ハガキ で。 〒164 東京都 中 野 区 東 
中 野 2-3-8 林 方 安嶋 栄祐 （19) 

★ CZ-6VTI を 3 万円で。 多少 汚れて いたり 傷が あ 
つても 結構です。 連絡 は 往復 ハガキ で。 亍186 
東京都 小 平 市上 水 南 町 4-9- 8 山野 得 生 （ 1 8) 

★ カラー ィメ一 ジポ一 ド 「CZ- 8BV2」 または 「CZ- 
8BVI」 を 送料 込み I 万円で。 連絡 は 往復 ハガキ 


で。 〒652 兵庫県 神 戸市 兵 庫 区 塚 本 通 3- 卜 4 
岡 崎 礼 子 （25) 

★ X68000 の 増設 RAM ボ一 K r CZ- 6BEI」 を I 万 5 千 
円 前後で （マニュアル 付き）。 連絡 は ハガキ で,： 
価格 優先で I 人 だけに 2 週間 以内に 連絡し ます。 
品物が 届いて から 代金 を 送る つもり です ので， 
その 条件で は 都合の 悪い 方 は ご 速 慮く ださい = 
亍 399-02 長野県 諷訪郡 富 士見町 富士見 4654 
宮下朗 （18) 

★ XI 用 FM 音源 ポ 一ド 1 "CZ-8BSI」 （付属 ソフト， マ 
ニュ アル 付き） を 8 千円で。 完動 品， 外観 不問。 
1987 年 10, 12 月 号. 1988 年 12 月 号お よび 1989 年 1, 
2 月 号 を 付けて く れる 方に は I 万 I 千円で。 連絡 
は 往復 ハガキ で。 〒839-11 福岡県 久留米 市 善 
導 寺 町 与 田 37-14 鹿田剛 （18) 

バックナンバー 

★ Oh!XI989 年 I 〜8 月 号 を 送料 込み 6 千円で g い 
ます。 切り抜き 不可。 連絡 は ハガキ で。〒 280 千 
葉 県 千 葉 巿星久 喜 町 II 73 佐 久間優 （18) 
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DRIVE ON 

この コーナー では， 本誌 年間 モニタの 方々 の 
ご 意見 を 紹介して います。 今回から 新しい モ 
ニタの 方々 にご 意見 をいた だく という ことで, 
記事に 関する 二と だけで はなく， コンビ ユー 
夕 や 本誌に 関 していろ いろな こと を 質問 さ せ 
ていた だきました。 二れ から も いろんな 二と 
を 聞かせても らいたい と 思います。 I 年間 ど 
ぅぞ よろしく お願いします。 
パソコンに ついての 考え 

秦 パーソナル コン ピュー ティ ングと は 本来 

「それ 自身」 を 楽しむ もの。 つまり コンビ ュ 
一夕に 触り イマ ジネ一 シ ヨン を 高めて いく と 
ころに 楽し さが あると 思う。 また， 僕が コン 
ピュー タを 知った 頃と いうの は そのよ う な考 
え 方が 当然の 時代であった。 bask; にしろ， マ 
シン 語に しろ， 数々 の 言語に しろ， それ を 使 
つて 何 かもの を 作る， という こと は 二の次で 
あるよう な 楽しみ 方 をして いる。 考えて， ぷ 
つかって， 反応が 返って くるの が 面白い とで 
もい うのであろう 力、。 また， そのような 楽し 

み 方が あるから こそ， MZ の 古い テープ ベース 
の 言語な ども 出回った ので あつたと 思う。 
長 谷川 敦士 （け） MZ-2521, MSX2 山形県 
• 私 はハ一 ド屋 さんです ので， 「人間の 生み出 
した 技術 は 人間の 生命 維持に 役立た な く て は 
いけない」 という 基本 理念 を 持って います。 
私が 自ら 作り出す ものに おいても， 作る 人間,, 
使う 人間 双方に その 有効性 を 享受し なければ 
いけない と 思って います。 私の 周りの 機械た 
ち は 人間の 害になる ものに ついては どんな 二 
と があって も 排除され る という たいへん 厳 し 
い 環境に 置かれて 苦労して いるよう です （で 
も， 動か なくなったら 心 を 込めて 修理し ま 
す）。 しかし， これ を 少し 飛躍した 解釈で 臨む 
なら， 「人間が 生み出 し た 技術 は 人間が 便利に 
なるなら どう 用いても 構わない」 という こと 
になる と 思う のです。 言い換えれば， r 骨まで 
しゃぶる」 という 二と になります。 コンビ ュ 
一夕， とりわけ パソコン は 信じられ ないよう 
な 進 ィ匕を 遂げ， より 高い 性能 を， より 使い や 
すい 環境で 我々 に 提供して います。 ユーザ一 
力く 「ああ， 便利 だな あ」 と 思えば それ はパソ 
コ ン がその 能力 を 発揮して いると 考えるべき 
で， どうして 便利と 思われた のか は 特に 問わ 
れる もので はない と 思う のです。 つまり， せ 
つかく 個人で 所有で きる の だから， 使いたい 
ように 使って 便利に， そして 幸せに なれば そ 
れで いい， これが 私の パーソナル コン ピュー 
ティング に対する 考えです。 そもそも 私 は， 
コンピュータ を 個人で 所有す る 二と な ど 考え 


from 


♦ 


てはいけ なかった 時代の 人々 が 現実に 個人 所 
有で きる "コンピュータ'' を 目の当たり にし 
たと き， その ギャップの 大きさ ゆえに 「パー 
ソ ナル」 と 誇張す るに 至った の だと 考えて い 
まして， あまり 個人用と いう ことに 対して は 
こだわりた く ない というの が 本音だった りす 
るので す。 

浅野憲 （19) X 68000PRO, X I turbo I, X I F 
model20, MZ-80C, PC- 6001， M5jr, PC- 1 245 
大阪府 

最近の 本誌の 傾向に ついて 
• 最近 特に 気づく ことで あるが， 内容が やさ 
しすぎる ものが あると 思う。 記事で はなく 初 
心 者に 対して 二の こと をい いたいの である。 
以下の こと を 例と して 挙げる が， これらの こ 
と は 絶対に 人に 聞 くよりも 自分で マニュアル 
などで 調べて 理解 しないと， 将呆 本当に 理解 
できない だろうと 思う。 ァ フタ一 ケアの 
config.sys の 害き 換え， メモリの 件な どで あ 
る。 この 2 つ は （ほかに ももつ とあります 力 <) 
システム を 理解す るう えで 逃げられな いもの 
であるだろう し， 人に 聞く 前に 自分で 工夫し 
て みても い いんじゃ ないかと 思う。 やはり， 
年 I 回 か 2 年に I 回く らい， 永久 保存 版で こ 
れ以上 やさ し く できない という く らいの 特集 
を 組む しかありません ね。 …… でも， 言わせ 
て もらつ ちゃう と マニュアル 読んで できる こ 
と は 説明し なくて いいと 思う し， 初心者の 甘 
え はよ く ない と 思う。 

中 川 比呂志 （19) X 68000, X ICs 東京都 
特集 「マシン 語への 第一 歩」 について 
秦 いやいや， 私に は むずかし すぎて,， でも， 
「ぜんまい ちゃん」 は 面白かったです,， 私 は 
「ぜんまい ちゃん」 の 過去 を 知りません が。 
こ う いった 取つ 付き やすい 記事 は 大歓迎です。 
6 月 号の 付録 ディ スクの PASCAL コ ンパ イラ 


で I から 100 まで 順に 足す という なんと も 単 

純で ァホ らしい （しかし， 昔 は ソロ バンで よ 
くやった ものである。 それに， 私 は それ くら 
いの プログラム しか 組めない ので ある） プロ 
グラム を 組んで コ ン パイル し たのです が， 

AS, X がなくて （リンカ は HLK を 持って いる） 
ソースファイル しかで きな かったん です ね 
(P. 132 の 「Q」 は 私ではありません が， 私 も 
そ う 思った ものの ひとり です）。 そ こ でなん だ 
か 興味が わいて， できた ソースファイル を ED 
に 読み込ん だんです。 そこで, 「あ一」。 10 行に 
も 満たなかった 稚拙な プログラムが なんと も 
長く わからな いものに （当たり前 か） なって 
いたんで すね。 そこで ひと 言， 「マシン 語と は 
なんと 奥深い ものな のだろう ！」 という こと 
で， いつ か 68000 の マシン 語 を 勉強して みたい 
です ね。 

安井 百合 江 （16) X 68000PRO 愛知県 
參 7 月 号の 特集で よかった 点 は， マシン 語が 
まったく わからない 人で も 読める と いう こと。 
吉田 幸一 氏の 「ぜんまい ちゃん」 は マシンと 
マシン 語の 関係 を 理解し やすく， しかも 面白 
く 説明して いる： = そして， 毛 内 俊 行 氏の 記事 
では もっと 具体的に アセンブラの 使い方 を 示 
している。 この 中で 目新し いのは 例題が ある 
こと。 たった 二れ だけの ことで. 知識と して 
だけで な く ビジュアルに 捉える ことができ る。 
私 もこの 例題に はお 世話になり ま した。 し 力、 
し， その あと は MC68000 の 話に なって しまつ 
て， 基礎知識が まったくない 私に は さっぱり 
わからなかった。 なお， 最後に 山 田 純 二 氏が 
しっかりと XI, MZ ユーザー を フォローして 
いるの を 見て， これが Oh!X という 雑誌の 本 束 
の 姿 だと 思った。 

畑剛志 （18) XI turbo model I0/ZII , JR- 100, 
MSX 北海道 


ごめんなさいの 
コ" 

8 月 号 表紙ぎ やらり い 

1983 年 7 月 号の 写真が 8 月 号の ものに なつ 
ていました。 お詫びい たします。 
8 月 号 XROT0.X 

大きな オブジェ ク 卜と リンクした ときに リ 
ン 力の オーバ一 フロー エラ一 になる ことがあ 

り ますので， XROT0.S の 208 行の BSR W_LIN£ 

を JSR W LINE に 変更して ください。 また， 

XROT0. S は 画面 サイ ズを 設定す る 引数 W, H 

を 128 までし か 受け付けません。 

7 月 号 ノ一 マル X1 への 対応 

P. I40 リスト 2 の 行の 「な I 」 は 正し 

く は r KM0DE I」 です。 

お問い合わせ は 原則として' 本誌の バグ 情 

ノ乂ク お 問し 人口が 甘 1 ま 報の みに 限らせて いただきます.. 入力 法， 操 

s?03(5488)1311( 直通） 作 

月 〜金曜日 16 ： 00 〜！ 8 ： 00 求める お 電話 をいた だきます が， 本誌で はい 

つ さいお 答えで きません。 ご了承く ださい。 
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Oh!X 第 1 号 
それが どラ したって 7 

▼ 編餘が 引っ越し， 今月 号 は 新しい ビルで 

初めて 作った Oh!X となります。 一口に 引っ越 
しとい つても， Oh!MZH#f 弋 からの マシン ゃソ 
フト， 劑斗 など を 引きずる Oh!X の 荷物 は 生 半 
可な ものではありません。 たった 4 人の 部で 
ある にもかかわらず， 荷札の 数 は 50啦 を 超 
え， 数 ある 編集部の なかで も 最高でした。 
その 新しい 建物です 力、'， I, 2 階 力、' 銀行で， 

3〜10 階が ソフ 卜 バンク， 最_^ 皆が レス トラ 
ン という ディ レクト りです （ちなみに Oh!X は 
3 階に あ り ま す)。 新築で 設備 もなかな 力、 なの 
です が， なに し ろ 下に 銀行が ある もので ビル 
の 1 ^力 報 し し 、。 24 時間 離の 知れな ぃスタ 
ッフが 出入りす る 編集部に はきつ いのです。 
深夜 来 る スタッフに は 駅前の 公衆電話 か ら 

「開けて コール」 を かけても らい， I 階の 通 
用 口まで 迎えに 行く という 情けな さ。 なんと 
かしても らいたい のです 力、 おまけに 二の 辺 


に は 食べる ところが 異常に 少なし、。 上の レス 
トラ ンは 高す ぎて 行けない し …… ， 編集 スタ 
ッフの 食生活 はどうなる のでしょう。 

という わけで 今回 は， Oh!MZ の 創刊 第 2 号 
を 3 名の 方に 差し上げ たいと 思います。 ご 希 
望の 方 は 11 じ 込みの アン ケ 一 ト ハガキ のプレ 
ゼント No. に 0 と 記入して お送り くださし、。 
▼ さて， 今月 号の 體 I は， 力、 ねて より 近々 
やらねば と 考えて いた 日本 理 に関する も 
のです。 Oh!X 力; 考える ノ、' 一ソナ ル マシン は そ 
れ 自体が 魅力的で あると 同時に， ュ一 ザ一 が 
使う 気になれば 実務に も 耐えうる もので なけ 
れば なりません。 でも， ^想 売 者の 皆さんの 
大多数 は， 年賀状 や 簡単な 文書 ムぉト に， 日本 
語の 文章 を 自分て 考えて 作成す る 機会が あま 
りない のではないでしょう 力、。 ビジネス ソフ 
卜が 少ない という 前に， そういう ソフト を必 
要と する 状況 を 現 ユーザーの なかから も 生み 
出して し 、かなけれ ばと 思う のです。 でき れば， 
ノ 〈ソ コ ンで 日本語 を 処理す る こ と に関する 皆 
さ んの 二者 見 をお 聞かせ く ださい。 
▼ 今月の INTEGRAL XI は 編集の 都合に よ り 
ぉィ 木み させて いただきます。 


像 原稿に は， イ^ '氏名' 年齢 '職業' 莲絡 

先 電話番号 • 機種 • 使用 言語 • 必# な 周辺 
機器 • マイコン 歴を 明記して く ださい。 
參 プログラム をす 就 高され る 方 は， 詳しい 内容 
の 説明， 利用 法， できれば フローチャート， 
変数 表， メモリ マップ （マシ ン 語の 場合） 
に， 参考文献 を 明記し， ブロ グラム をセー 
ブ した テープ （ディスケット） を 添えて お 
送りく ださい。 また， 掲載に あたって は， 

編 ft_b の 者 [5 合に よ り 加 攀彥 正させて いただ 
くこと が ありま すので ご了承 く ださい。 
* ハードの 製作な どを^される 方 は， 詳し 
い 内容の 説明の ほかに 回路図， 部品 表， で 
きれば 実体 配線図 も 添えて く ださ し、。 編集 
室て-^! 寸 のうえ ， 製作した ハ一 ドが 蝶な 
場合 は ご連絡い たします。 

翁 ま 货 高 者の モラルと して， 他 誌との 二重き sm, 

他機ネ Iffl プロ グラム を 単に 赚 した もの は 
固く お断りい たします。 
あて 先 
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► まぶた を 閉じる と， グラデーション 力 (浮かび， 耳 
をす ませば ジヱノ サイ ドの 音楽が …… 。 最後の 夏 休 
みだと いうのに 暇 を もてあま している。 楽しみにし 
ていた: s ^^も 行けな く なって しまったし。 ここ は， 

涼しい マシンルーム， 部屋に 帰れば 30 度 も 振り切り 

っぱなしの^^ 言 t ^業 を 迎えて くれる。 ^^な 日々 
カ滅 いているな あ。 がんばろ。 滅） 
► 車で にくる と， そのまま どっかへ 3テ くこと 

もま まある。 二の 前 は S.K. 氏と タイヤ を 鳴らして 深 
夜の 17 号 をき (でも 軽な の)。 まあ S.K. 氏との 爆 走 
ドライブ はいいと しても， 編集の A 氏との ^ドラ 
ィ ブには 困るな 一。 なぜ 力、 A 氏が 横に 座る と 必ず 迷 
うの だ。 車の 中で ダジ ャレ 勝負 をして いるせ いで は 
ない， と 思う けど。 多分。 (H.U.) 
► リンドバーグの ボーカルの 渡 瀬 マキが， 元 アイ ド 
ル だと は 知らなかった， 一^られ たな。 さて， 夏 
^はなに をしょう ？ 友達 は みんな 田舎に 帰る し 
な あ （下宿に は クーラ一 がない が， 実家に は あるか 
ら帰 るの だそう だ)。 一方， 東京に 残る 組 は 冬の スキ 
—に 備えて バイ 卜する の だそう だ。 まった く なんな 
んだ？ 二い つら。 （亀） 
► 出張で スペインと ボルト ガルに 行く ことにな つた 
の だが， 出 0 定 日の 3 日 前にな つても 飛行 勸、' 何 
時に 成 田 を 出る のか 矢 口ら されて いない。 それ ど 二ろ 
か， Jt^^ 土 は 昼 出発と 言い， 航空 封土 は 夜 出発 だ 
と 言い張る。 おまけに， 舶瑜 土から 聞いた ポルト 
ガルの ホテルの f ^は 実在 し ない i 也 名 だと いう だ。 
果たして 無事た どり 着く の だろ う 力、。 (K. M. ) 


► 全国的に 恥 を さ ら すよう だ 力 S いま 免 停 中で ある。 
この 本が 出る ころに は 更生して いる ことだろう。 
常々， あんな 取り 練 まりて 激 者が 減る はずない と 
思って いた。 しかし 今日， その 考え を 変えた。 あの 
2 日間 もの 講習 は ィャガ ラセと しか 思えない。 あれ 
をもう 一度 受ける こと を 考える と， 飯す る 
せる。 う一 ん 素晴らしし ボ f] 止 効 ぁ （A.T.) 
► 効 きか 第い-' た ま に 効かな く なる— た ま に は 効 く 
—減 多に 効かない— 効いたら 奇跡， と 5 段-活用して 
インタラプト ス イツ チか^ E んだ。 デノ 、'ッ グ 中に ノ 、'コ 

ノヽ' コ押 しま く つたから な 一。 追い^ r ち を かける よう 
に， 今度 は リタ一 ン キーが チヤ タり 出す。 期せず し 

て CTRL+ M の 人と なった 僕 は， 右手 旨 力 〈 楽 だぜと 
うそぶく のだった。 （Mu) 
► そんでも つて， ハン ニノ、' ル' レ クタ一 である。 人 
間 を^ il^] に 面白く 鲁 ける トマス • ハリスって 凄い 
と 思う。 ハヤカワ: の 1 " レッド ドラゴン」 と 新 
潮 文庫の 「羊た ちの 沈黙」 を 読んで ちょ。 馘理 的な 
親切と 力、^ iifi 勺な 愛 と 力、^ ！鹏 な 狂気と 力、^ II 的な 
ギャグと 力、 言 翁 な柩悪 と 力、。 誠 里 的;^ さと 
非言龢 里的惰 動 はや は り 'ii 要 だよ ね。 (K) 
► ふ と 思し 、立って 車 を 買 うこと を 決心 し た。 契約す 
るのに 三文判で は カツ コ悪 いと 思って 新しい ハンコ 
も 作った。 だが ディーラー は 僕に 駐辆 がない とい 
う 理由で ハンコ を 押させて くれない。 せっかくの 意 

み を 打ち砕かれた。 サービスて ■! 主韓 くらし 端 
して くれても いい じ やない。 ああ 面^^い な あ。 

(杉 t 伝 ターボの 3 倍モ一 ドカ c | 麵な K0) 


► 電車に 乗って いると， 突然， 横に 座って いた タ 個 
人力 1舌 しかけて きた。 なにかと 思ったら 自^ C7) 降り 
るべき 駅 力 ， 目 かと …… そこでと り あえず 教えて 
あげる と， お札に （？） 名刺 を くれた。 名前 を 見て ィ 
ンド人 かと 思い 「インディアン？」 と 聞いて みた 力 《 
見事 外れて しまった。 今度 パキスタンに 行ったら 家 
に 泊めて;^ モハメッド =ュ 一ナスさん。 （A) 
► 編集部の 引っ越し を 機に， 杉並^から 銜兵 市民 
になる; 先 意 をした。 が， 問題 は 荷造り。 4 年間て 著 
積され たおお よそ 独り暮らしと は 思えない 物 簠をま 
とめる の は 不可能に 近い。 何人 か 友達 を 引っ張り 込 
もうかと も 思った が， また^ 寺定 多数の 人間が 出入 
りしそう なので やめた （今度 は 3LDK だし)。 ああ， 
ドラえ もんが ほしい …… 。 （と 思う 怠け者の E.O.) 

► 「ASK68K つてな にがまず いんでした つけ？」 「や 

つ ぱ り 単; 鮮 じ やなし 、です か」 「読みが な も 単; 登 
録 すれば よくな り ますよ」 「なるほど」 「ほかに まずい 
点って？」 「なんでし たつけ？」 現在のところ メイン 

辞書 740K バイ ト， サフ 1 辛 書 I I8K バイ ト。 もう 少しな 
ら， なんとか なるな。 あと はレ一 ザ一 プリンタ も ほ 
しいと ころ だが …… 。 （U) 

► 8 つの 編集部が I つの 大きな フロアに 並んだ。 整 
然と した オフィスの 端に 立つ と， I 力 箇所 だけ ニョ 
キニ ヨキと そびえ 立つ 棚の 上に さ らに 荷物 力 ，貴み 上 
げられ た 火山 地帯が 視界 を さえぎる。 そこ 力 ( 秘境と 
呼ばれる Oh!X と Oh!FM の 職 部た'。 しかも 夕方に な 
ると^^ を き つた ゴース 卜 バスター ズ おばさん 
が やってくる。 「ここって 迷路ね」 だって。 (T) 


編粜 室から U3 


microOdyssey 


我々 にと つて ワープロ は 商売道具 だ。 原稿 用 
紙 を 相手に する 代わり に ワープロで 文字 を 追う， 

それが 当たり前 になって 3, 4 年。 すつ か り ワープ 
口に 惯れ きってし まった。 いまでは 原稿用紙に 
ひと マスず つ 字 を 埋めて 論理的 文章 を 完成 させ 
ると いう こと は 神業の ように も 思える。 どうし 
て 昔 はそんな ことができた のだろう か。 

ワープロ は 文書 作成 効率 を 劇的に 引き上げる。 
アイデア プロセッサ という 考え方が 出る 以前 か 
らヮ一 プロ そのものが 同種の 機能 を 果たしてい 
たから だ。 

力 S 弊害 も ある。 それ は 文字 フォン 卜の せいか 
もしれ ないし，一 度に アクセス でき る 情報量の 
せいか も しれな し、， とにかく 画面 上で は ケア レ 
ス ミスが 多くなる。 デバ ッ グ 効率 同様,一 度 プリ 
ント アウト した ものと 画面 上の もので は 認識の 
しゃす さが 違う の だ。 結果と して， ワープロで 省 
いた 文章 は 小さ な ミ スが 発生し やすい。 ま た. 安 
易に 切 り 貼りす る 二と がで き る ため ワープロ ゆ 
えの 悪文と いうの も 出て くる。 下 害き がその ま 
ま 清 害 と な りうる から か， つ い 推敲が 甘 くなる。 

そう， ニニ で 問題な の は 「下書 き 用」 の ワープ 
口な の だ。 ここでい う 下 害き と は， 文 害の 内容 そ 
の もの だ。 ワープロ はより よい 内容 を 害く こと 
を サポート する ツールであって ほしい。 こと ヮ 
一 プロに おいて 「清書 用」 という 言葉が 悪口 以 
外で 使われな いのは， 下 害き の 段階 を 無視 し て 
淸鲁を 行お うとす る ものが あまりに 多い から だ。 
下 害き がで きない 状態で DTP について 語っても 
実の ある ものに はなるまい。 ワープロ に関する 
最初 の 問題点 といえるだろう u 

日本語 処理の 最終的な 問題点に 入力装置 を挙 
げる人 は 多い。 そして， 多 く の 人が 手書き 文字 認 
識, 音声 入力な どに 期待 を かける。 

手 害き 文字 認識 は 一部の 電子 文 具です でに 実 
用 化されて いる。 ひらがな を 入力して 変換 機能 
を 併用す る もの， 直接 漢字 を 認識す る もの。 認識 
稍 度 や 速度 はいく ら でも 改善 可能 だから 特に 問 
題に はならない。 字画 数が 多く なると 手 害き が 
本当に 楽な のかと いう 疑問 は 残る 力 S これ も 技 
術が 解決 し て く れる 可能性が あ る。 まあ， 期待し 
てみ るの も 悪く ない。 

対して， 音声 入力 だ。 入力の ための 労力 はさら 
に軽滅 される だろう。 が， 音声 入力 をして いる 図 
を 想像す ると なかなか 不気味な ので はない か， 
という 意見 も ある。 確かに 音声 入力 ワープロで 
ラブレター を 害く 男と いう の は あ ま リ 想像 し た 
く ない。 

たとえ， 完成したら 公になる もの だと しても， 
害き かけの 文章 を 他人に 硯 かれる の は 気持ちの 
いい もので はない。 まして， ブライべ 一卜な 文 害 
ならな おさら だ。 音声 入力が一 般 的な 入力装置 
と して 碓 立され る 際に こ う いった 問題 は 解決 さ 
れ るだろう か？ 

そうこう している うちに， いっそ 「思考 を 直接 
入力で きたら …… j という 夢物語に 行きつ くこ 
と になる。 頭に 浮かんだ ことが, 淀みな く ディ ス 
ブレイに 表示され る 画期的 イン タフ ヱ イス。 あ 
ら ゆる 点で 理想的 だとい えよう。 夢物語？ 手 
首に 電極で 埋め込む 気 かって ？ と 二ろ が， 
それに 非常に 近い もの はすで に 存在して いる。 
そう， それ は 「ブラ イン ドタ ツチ j と も 呼ばれて 
いる 技術 だ。 （U) 
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T-ZONE 7F ブッ ク ゾーン 



0492(25)3138 


03(257)2660 


川口 

岩浏害 店 

八重 洲 

八重 洲ブッ ク センタ 一 3F 



0482(52)2190 


03(281) 181 1 

茨城 

水 戸 

川 又會店 駅前 店 

新 宿 

紀伊国 度 書店 本店 



0292(31)0102 


03(354)0131 

大阪 

北 区 

旭 屋害店 本店 

高 田 馬場 

未来 堂 害 店 



06(313) 1191 


03(200)9185 


部. に', [ズ 

駸々 堂 京矯店 

渋 谷 

大盛堂 害 店 



06(353)2413 


03(463)0511 

京都 

中京 区 

オーム 社 害 店 

池 袋 

リ ブロ池 袋 店 



075(221)0280 


03(981)01 | j 

愛知 

名古屋 

三省堂 名 古屋店 

〃 

西武 百貨店 9F 



.052(562)0077 


コンビ ュ一タ • フォーラム 



パソコン 2 上前 津店 


03(981)01 1 1 



052(251)8334 

横 浜 

有 隣 堂 横 浜 駅 西口 店 
045(31 1)6265 


刈 谷 

三洋 堂 害 店 刈 谷 店 
0566(24) 1 134 


有 隣堂ル ミネ 店 
045(453)081 1 

長 野 

飯 田 

平安 堂 飯 田 店 
0265(24)4545 

藤 沢 

有 隣 堂 豚 沢 店 
0466(26) 141 1 

北海道 

室鬧 

室 蘭 工業大学 生協 
0143(44)6060 


賴購鑌 のお 知らせ 

Oh!X の 定期 購読 を ご 希望の 方 は 綴じ込みの 
振替 用紙の 「申込書」 欄に ある r 新規」 r 継 
続」 のい ずれ かに 〇 をつ け， 必要事 項 を 明記 
のうえ， 郵便局で 購読料 をお 根り 込みく ださ 
い。 その 際 渡される 半 券 は 領収書に なって い 
ますので， 大切に 保管して ください。 なお， 
すでに 定期 購読 を ご 利用の 方に は 期限 終了の 


少し 前に ご 通知いた します。 継続 希望の 方 は， 
上記と 同じ 要領で お申し込み く ださい。 
海外 送付 ご 希望の 方へ 

本誌の 海外 発送 代理店， 日本 IPS (株） にお 
申し込み ください。 なお， 購読料 金 は 郵送 方 
法， 地域に よって 異なり ますので， 下記 宛必 
ずお 問い合わせく ださい。 
日本 IPS 株式会社 

〒101 東京都 千代 田 区 飯 田 橘 3-1 1-6 
©03(238)0700 
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^TC 力; 


会社 説明 会 


8 月 20( 月) /21 (火)/ 22( 水)/ 23( 木)/ 24( 金) 

は 5 曰 以降 随時） 

会 場/本社 総務 人事部 

時 日： 9:00~、21 日、 22 日、 23 日、 24 日 ：13:00~ 

連絡先/ 03-5488-1115 

(人事部/古 屋 • 望月） 

住 所/〒 108 東京都 港 区 高 輪 2-19-13 NS 高 輪 ビル 


大 阪 


8 月 2K 火)/ 27( 月) /9 月 3( 月） 

会 場/西 曰 本 営業部 

時 間 /13:00~ 

連絡先 06-264-1471 (代） 

(総務課/坂 本 • 前 田） 

住 所/〒 54〗 大阪市 中央 区 南 本 町 I -7- ほ 明治 生命 iff 筋 本 町 ビル l OF 



コンピュータの 素晴らし さは、 



番 知って t 、る。 



SOFT 
BANK 


ソフ卜 /\ン ク 株式会社 



ソフト パンクの 

書籍 特約 書店 


下記の 書店の 一覧 は、 ソフ ト バンク 書籍^ 
店と してお にある 商品の^ gfflj もとり そろえ 
ております。 ご 希望の 商品が ある Jf^ は、 下記 
のお 近 く の 書店に てお 買い求め 下さ い。 
(注) ？ IS 力、' 売れて 航 中の 船 も ご ざし 、ますので、 

ご; i 意 下さい。 


SOFT 
BAIMK 

ソフ卜 バンク 出版 事業部 

T10B 東京都 港 区 高 輪 2-19- 13 ^03(5488)1360 


全国 特約 書店 一覧 


く 北海道》 



t 宮？ TT 

ネ 甲 田 嫌 文 堂 

048-641-31"! 

く 東 京 > 



礼晚市 

紀伊國 度 害 店 札 « 店 

011-231-2131 

1! 

ブック センター 押 田 

048-647-3141 

千代 田 区 

三 雀 堂 害 店 神 田 本店 

03-233-3312 


旭 p 害 床 礼 店 

01 1-241-3007 


さ 省せ ブ' ン 力 ポー 卜 

018-646-2600 


害 泉グ； ンデ 

Q3-2 ( > | ;-00 1 1 

〃 

九 善 ら が あ 一 る 新札 DUO 店 

01 1-890-2588 

展 市 

'ft '51 iX. UK la 

048 パ- M- 121 1 


5K*j-je. 雷 la 

U<J 1 J 1 O 1 


I »* 礼幌 パパ コ^ 

011-214-2303 

川 P 巿 

岩浏害 店 川口 店 

0482-52-2190 

II 

ノ， -x ん ： .：."-. ^ 

03-294-3781 


7 つ ， BW'T'/ci 

01 1 -71 2- ?l i4 1 

川 越 市 

s m <■» rt; 1 1 1 .tit rt? 

nAQO ゥ G つ 自っ o 

" 

？ US お St の 水 ft 

03-295-558 1 


ダイヤ 書房 西 店 

U 1 圍 QQ^J Oi- C J 

flfT 沢 市 




！お ： せ V： 

03-291 - I3d^ 

旭 川 市 

カ8 川 S 奮 1 ^ 

Q|gg-2R-34g| 


1 、け ナ-. 塞 

ぃリ レ雷ノ 6f7 【八/ (±1 




—ど; — 8；) ピ 1 


ブック ス 平和 マ-ルカ ッ店 

0166-23-621 1 

上 福闳市 

展田會 店 上 福 岡 店 

0492-66-0120 


明 正 ま 秋 葉 J5 店 

03-257-0758 

苫小牧 市 

旭 S 書店 苫小牧 店 

0144-36-5185 

^ ； r.- 

文教 堂 朝 B 店 

0484-76-0107 


Bit INN 束 京 

03-255-4575 

〈東 北 > 



«r" rfi 

新星 堂 志 木 店 

0484-74-0182 


T - ZONE 

03-257-2660 

青 森 市 

成 田 本店 

0177-23-2431 

春 日部巿 

文教 堂 春 日 部 店 

048-752-7666 


ラ オック ス THE COMPUTER 館 

03-5256-3111 


岡 田 書店 

0177-23-1381 

比 企 郡 

錦 電サ一 ビス 

0492-96-2962 

中央 区 

八重 州 ブック センタ一 

03-281-1811 

弘前市 

紀伊國屋 書店 弘前店 

0172-36-451 1 

千葉巿 

多田屋 セン ト ラル プラザ 店 

0472-24-1333 


曰 本 棟丸蕃 

03-272-721 1 


今 衆 本店 

0172-32-2231 

u 

キ ディ ランド 千 葉 店 

0472-25-20 U 


旭 £ 害 店 銀座 店 

03-573-4936 


メディア ィ ン城東 店 

0172-27-81 18 

習 志 野 市 

港眾堂 

0474-72-501 1 

港 区 

書厣新 ％ 店 

03-591-8738 

八 戸市 

伊吉 書院 

0178-44-1917 

船樣市 

ときわ 害 房 本店 

0474-24-0750 


雄峰 堂 N S 店 

03-503-6586 

as 岡 市 

さわ や 書店 

0I9B-53-44I 1 

ti 

リ プロ 船撟店 

0474-25-01 1 1 


虎ノ門 害 房 本店 

03-502-3461 

仙 台 市 

第一 書店 

金 港 堂 

0196-53-3355 
022-225-6521 

a 

旭 屋害店 船橋 店 

芳林 堂; 拿 田 沼 店 

0474-24-7331 
0474-78-3737 

&a 川 Ih. 

虎ノ門 醫 S 田 町 店 

芳 林堂大 井町 店 

03-454-2571 
03^474-4946 


金 港 堂 ブック センタ一 

022-223-0979 

ti 

第二 ffi 翠堂 

0474-65-0926 


明 S 會店 五反田 店 

03-492-3881 


ァ イエ 書店 前 店 

022-264-0718 


三省堂 書店 西) K 樣店 

0474-34-31 1 1 

i お 谷 区 

紀伊國屋 害 店 渋 谷 店 

03-463-3241 


丸 春 仙 台 支店 

022-266-1 127 

柏 巿 

西口 アサノ 

0471-44-21 1 1 


旭 S 香 店 渋 谷 店 

03-476-3971 


高山 害 店 

022-263-151 1 


新星 堂 柏 店 

0471-64-8551 


三省堂 書店せ 谷 店 

03-407-4545 

秋 田 市 

三 浦 書店 

0188-33-8131 

松 戸市 

堀江 良 文 堂 

0473-65-5121 


大盛堂 書店 

03-463-051 1 

山形 市 

八文字 虔 

0236-22-2150 


辰 正 堂 IR ビル 店 

0473-64-7997 


紀伊 S 歷害店 笹塚店 

03-485-0131 

裼島巿 

岩 « 書店 コル 二 エツ タヤ 店 

0245-21-2101 

横 浜 市 

有 S 堂 トー ョー店 

045-31 1-6265 

新 宿 区 

紀伊 害 店 本店 

03-354-0131 


博 向 堂 

0245-21-1161 


有 R 堂 東口 ルミ ネ店 

045-453-081 1 


三省堂 醫店新 宿 西口 店 

03-343-4871 

83 山 市 

東北 書店 

0249-32-0379 


栄松堂 相鉄 ジョイ ナス 店 

045-321-6831 


福 家 寄 店 センター ビル 店 

03-345-1246 

いわき 市 

ヤマニ 害 房 本店 

0246-23-3481 


そごう ブック センター 

045-465-21 1 1 

〃 

福 家 害 店 野 村 ビル 店 

03-342-0298 


鹿 * ブック センタ一 

0246-28-2222 


九蕃 ブック メ イツ ポルタ 店 

045-453-681 1 


新噩堂 N S ビル 店 

D3-344-?055 


宝 文 館 

024P-27-5I98 


有 》 堂 伊 »fe 木 店 

045-261-1231 


西武 新 宿 ブック センタ一 

03-208-0380 

町 市 

文芸 S 

0244-22-1720 


有 S3 堂 戸塚 店 

045-881-2661 


芳林堂 》; 田 馬場 店 

03-208-0241 

<M 東〉 

水 戸市 




文 華 堂 戸塚 店 

045-864-5151 


チ来堂 

03-200-9165 

川 又 害 店 5R 前 店 

0292-31-0102 


アーバン 文 華 a 

045-821-5151 

R % 区 

旭 度 害 店 池 袋 店 

03-986-031 1 


ツル ャ ブック センタ一 

0292-25-271 1 


文教 堂 靑菜台 南口 店 

045-983-5150 


芳林堂 池 袋 店 

03-984-1101 

勝 田 市 

武石醫 店 

0292-73-12 は 

川 m 市 

有 隣 堂ァゼ リア 店 

044-245-1231 


リ プロ 池 袋 店 

03-981-01 1 1 

東海 村 

1 ^1*1 店 

0292-82-2098 


有 隣 堂 川^ BE 店 

044-200-6831 


三省堂 害 店 池 袋 店 

03-987-051 1 

鹿 島 郡 

なみき 書店 

0299-96-1855 


文学 堂 本店 

044-244-1251 


新栄堂 本店 

03-984-2345 

土 浦 市 

共栄^ 

0298-21-6134 

〃 

文教 堂 溝の 口 店 

044-8 II -8258 


新 栄堂ァ ルバ 店 

03-988-0181 

つくば 市 

丸 善筑波 大学 会館 店 

0298-51-6000 

鎌 食 市 

島 森 香 店 大船 店 

0467-46-3841 

台 東 区 
1 田 区 

明 正 堂 中通り 店 

03-831-0191 


友朋 S 吾妻 本店 

0298-52-3665 


鎌 食 害 店 

0467-46-2619 

ブック ストア' 談 

03-635-1841 

宇都 宮市 

落 合 害 店 オリオン 店 

0286-34-3777 

横須 《 市 

平 坂 害 房 WALK 店 

0468-25-5537 

葛 飾 区 

文教 堂 靑戸店 

03-838-5938 


落 合 書店 東武 ブック センター 

0286-34-8271 

s 沢 市 

有 隣 堂 藤 沢 店 

0466-26-141 1 

江戸川 区 

文教 堂 西 ft 西 店 

03-689-3621 


新 Si 宇都 宮店 

0286-33-2337 


リ プロ » 沢 店 

0466-27-01 1 l 

大田区 

ァク トブッ クス サン 力 マタ店 

03-735-1551 

小 山 市 

itMSW ビル 店 

0285-25-1522 


文教 堂 六 会 店 

0466-82-9610 


* 文 堂大森 IR ビル 店 

03-775-3851 

前 棵 市 

01 平 愛 

0272-23-1211 

茅 ケ崎市 

川上 書店 ルミ ネ店 

0467-87-3827 

中 野 区 

明 厘 害 店 東京 本社 

03-387-8451 


リブ 口前 樣店 

0272-34- ION 

平 塚 市 

サ クラ 書店 K ビル 店 

0463-23-2751 

杉 並 区 

ブック センタ一 荻 窪 

03-393-5571 


戸田 害 店 前 ffi 店 

0272-61-5063 


文教 堂 四 之宮店 

0463-54-2880 


害 原 杉 並 店 

03-313-4778 

m 崎 市 

mmm 

0273-23-4055 

小 田 a 市 

八 小 堂 害 店 

0J65-22-7I 1 1 

武蔵野 市 

紀伊國 S 害 店 吉祥 寺 東 急 店 

0422-21-5543 


サカヰ 書店 

0273-62-1500 


伊勢治 害 店 

0465-22-1366 


弘栄堂 吉祥 寺 店 

0422-22-1031 

it 

新 崎 店 
戸田 書店 高 崎 店 

0273-27-3961 
0273-63-51 10 

厚木 市 

文教 堂 小 田/ S 店 

有 膦 堂 厚木 店 

0465-36-3677 
0462-23-41 1 1 

1« 布 市 

パルコ ブック センタ 一吉祥 寺 
真 光 害 店 

0422-21-8122 
0424-87-2222 

太 田 市 

ナカ ムラ ャ 

0276-22-2001 

大和 市 

文教 堂 中央 林 M 店 

0462-75-4165 

府中 市 

啓 文 堂 

0423-66-3151 

く萏 都圈〉 

浦 和 市 

項 ％ 厦 本店 

048-822-5321 

相 橫原市 

文教 堂相模 大野 店 
文教 堂 ffi 本店 

0427-49-0650 
0427-74-5581 

三 腹 市 

〃 

三せ 堂 害 店 三囊店 
東西 害 房 

0422-48-4510 
0422-46-0275 


須 JSS コル ソ店 

048-824-5321 

相 模原市 

文教 堂星ケ it 店 

0427-58-6121 

小金 井 市 

文教 堂 小金 井 店 

0423-66-0161 



津久井 都 

文教 堂 城 山 店 

0427-82-9278 

国分寺 市 

三 成 堂 国分寺 店 

0423-25-321) 



情 
報 
処 
理 
試 
験 


8086 アセンブリ 言語 *2,890 円 

B086 マクロ プログラミング ， 2 ,哪 円 

入門 TU 巾 OPASCALVer5 ブ ログ ラミング *3,300 円 

GDC テクニカル ブック *3，0 円 
C 言語の 基礎知識 * 2 ヌ0 円 

C 言語の 活用 理解 *2,060 円 

C 言語の 応用 50 例 * 2 , 3 ?0 円 
上級 • C 言語の 応用 50 例 • 円 

Play the C 上巻 *し550 円 

Play the C 下巻 ^'sso 円 

C プリプロセッサ 'パワー マ 70 円 

Turbo C 入門 參2 ，円 

C + + プログラミング *2,680 円 
QuickC プログラミング *2,680 円 

詳説 cats "， 円 

MS-CVer.5.1 プログラミング ",3 00 円 
Turbo CVer. 2.0 プログラミング ^,90 0 円 


• 2, 480 円 

• 2, 580 円 

• 2, 580 円 

• 3, 500 円 

• 2, 300 円 

• 2, 990 円 

• 2, 370 円 
き 3, 800 円 
秦 2, 900 円 

• 2, 060 円 
き 2, 580 円 

• 2, 890 円 

• 1,860 円 
鲁し 240 円 
きし 240 円 

• 2, 270 円 

• 2,200n 


国立 市 東西 書店 


東 村 山 市 文教 堂 束 村 山 店 
立 川 市 オリオン 害 房 ウィル 店 
八 王子 市 く ま ざ わ 書店 本店 
町 田 市 有 ほ 堂 町 田 店 

！! 久美堂 本店 

" 久美堂 小 田: &店 

" 文教 堂 « 川 店 

" 文教 堂 小川 店 
多 O 市 くま ざ わ 害 店 桜 ヶ丘 店 
ffl 生 市 文教 堂 福 生 店 

(甲 m ■ 4tn> 
甲府市 文教 堂 甲府店 

& S 市 平安 堂 Sff 店 

" 長 谷川 害 店 

松 本 市 ブック ス ロクサン 

" 改通社 松 本 M ビル 店 
〃 ァ クロス ブック センタ- 
上田 市 平安 堂上 田 店 
鈑田市 平安 堂 飯 田 店 
岡 谷 市 笠 ffi 書店 
^訪郡 平安 堂 下 店 
新 潟 市 紀伊 SS 書店 新泯店 

" 萬 松 堂 
" 北光 社 
長 岡 市 覚張害 店 

〃 ブック センタ一: S 岡 

〃 長 岡 枝大長 « 文化 


0423-37-2531 
0425-53-7708 


025-229-, 
025-228 -； 
025B-32- 
025B-36- 
0258-46-1 


北 町 


野々 市町 


BOOK メ ディア 

睛明ま 

BOOKS なかた' 豊田店 
文苑 堂 本榔店 
文苑 堂 赤 江 店 


n 市 文苑 ま 


文苑 堂 « 田 店 
うつのみや 片町店 
害 林 香林坊 本店 
王 ほの 本本 店 
勝 木 書店 

品 川 害 店 新田 塚 店 


64-24- 
64-24- 
64-32- 


62-20-! 
62-46-! 


市 »岡 谷 島 S 與服町 本店 
江 崎會店 
吉見 書店 

戸田 書店 S 8 S 店 


>□ ュ 

富 士 

清 水 


マル サン 書店 宝 塚 店 
巿 戸田 害 店 窗士店 
市 戸田 書店 本店 

市 S 松 谷 島 展遼 尺 本店 

市 三 ili 堂 書店 名 古屋店 
星 野 害 店 近鉄 ビル 店 
九 * 名 古農 支店 

九蕃 ブック メ イツ セントう 
日 進 堂上 前^ 店 


名 古 S ポ 三洋 堂' 


ち く さ 正文 館 本店 
白樺 書房 西 店 
文 館 
>ス 鎌 食 

^梅 坪 店 

き 刈 谷 店 
三洋 堂 勝 川 店 
三洋 堂 一宮 店 
自由 書房 

を ブック ス 258 
£ 岐大 バイ バス 
三洋 堂 可 児 店 
三洋 堂 多 治 見 店 
別 所 香 店 II ビル 店 
文化 センター 白揚 
シェ トヮ 白^ スズカ 


05338-3-0334 


« 々堂 京 宝 店 
ァ バン ティ ■ ブック センター 
才ーム 社 書店 河原 町 店 
ジ ユンク 堂 京都 店 
オーム 社 害 店 竹 田 店 

w 々堂 大丸店 

旭 屋害店 本店 
紀伊國屋 書店 梅 田 店 
オーム 社 書店 大阪店 
» 々堂 京 t« 店 
» 々堂 心 斎 ffi 店 


-26-1>241 
06-313-1 191 
06-372-5821 
06-345-0641 
06-353-3209 


ナンパ ブック センター 
ヒバ リャ 書店 ナン ハ '店 
旭 屋害店 ァぺノ 店 
ユーゴ 一 害 店 
河 村 書店 

水 嶋鲁房 京阪 デバ一 ト店 
コ 一^ ^ブック ス 西武 高 機 店 
ヒ バリヤ 害 店 本社 

ジ ユンク 堂 センタ一 街 店 
ジ ユンク 堂 サン パル 店 


W6t 山 市 


く 中 国〉 


日 東 館 書林 

v;i ^ ^ 
誠心 堂 害 店 
S 井 平安 堂 
蒂伊害 店 

紀伊國屋 鲁店岡 山 店 
丸 蕃岡山 支店 
津山 ブック センター 
紀伊國屋 書店 広 島 店 
丸 蕃広島 支店 


0862-32-341 I 
0862-31 -22GI 
08682-6-4047 


〃 HI 蕃 fi 9 

鬼 it 市 啓 文 社 尾 il 店 
福 山 市 啓 文 社 福 山 店 


啓 文 社 コア 

五十部 誠 文 


閱 市 


中 野 害 店 
舊店 

K)a 豳 店 


0832-22-6181 
0836-31-2323 


三文 字屋 
；:, が， 


く 四 国 > 


" 森 住 九 善 

S5 松 市 宮脇害 店 本店 
几 亀 市 宮脇 書店 丸禽店 

松 山 市 紀伊國屋 害 店 松 山 店 
" 明度 香 店 本店 
〃 明屋 害店大 街道 店 
II 九 三 害 店 

新居 浜 市 明 屋星原 店 

宇 和島巿 明 屋宇和 島 店 

S 知 市 金 

< え 州 • 沖 繩> 

福岡巿 紀伊國屋 害 店 描 岡 店 

！ I り 一ぶる 天神 

// « 文 館 新 天 町 店 


北 九州 市 


久 留米巿 
鈑塚巿 
大分 巿 


描 岡 金 文 堂 ディ ト ス Ji 
描 岡 金 文 堂 アニマ 一 I 
ナ ガリ 書店 
金栄堂 

旭 S 害 店 北 九州 店 

井 K 度 ブック センタ- 
カル パーク 平野 
白 石 害 店 本减店 
ェ マックス たがみ 

BOOK リ ― K 
パルコ プック センタ- 
本町晃 星堂 
明 林 堂 


-大分 店 


宮^ 市 中央、 田 中 ■ 


乃 宮^ 店 

金 華 堂 北 パイ バス 店 

哦文館 佐 K 店 
項 文 館 ディ ト ス店 


093-521-1044 
093-531-3685 
093-631-6431 


0975-35-0643 


0952-23-7 I 55 


佐 世 保 市 


好 文 堂 
も 明 S 豳 店 
紀伊國 S 書店 熊 本店 
畏嵴 書店 

明 S 人吉店 

春苑堂 ブック プラザ 
ブック ス みすみ 
市 球 隔堂書 現 ビル 店 
文教 図 害 


特約 書店 基本 図書 一覧 ） 

^ y 定価 はすべ て稅 込です。 


ダイナブック 'スーパー ガイド • 
最新 八一 ド ディスク 入門 • 

最新 EMS'RAM ディスク 入門 • 
ブレイ MS-DOS • 
MS-DOS いたれりつくせり 本 • 
新 MS-DOS 入門 ビギナー 編 • 
新 MS-DOS 入門 シニア 編 • 
新 MS-DOS 入門 応用 編 • 
OS/2 API ブック I • 
◦S/2 API ブック II • 
UNIX オペレーティング 'ガイド • 
一太郎 Ver.3 ガイド • 
入門 一太郎 Ver.42 • 
PI EXE ガイド • 
RPG 幻想 m • 
RPG 幻想 事典 日本 編 • 
魔法 王国 シムル グン卜 • 


3,2oo 円 ■ LOTUS ト 2-3 カイド ビギナー 編 
2, 6oo 円 ■ LOTUS 卜 2-3 ガイド II 

2-500H ■ 桐 Ver2 ガイド 
し 960 円 B 入門 桐 Ver.2 —括 処理 
し860 円 g|\iinJa3 ガイド 
'.goo 円 ■ MS- Chart Verll ガイド 
2, 300 円 ^ まいと一 く ガイド 
2,3 00 円 巳 ASEIIIPLUS ガイド 
2,790 円 國 The CARD 3 ガイド 
3, 000 円 ■ アセンブラ CASL 入門 

3,090 円 國八 一ドウ エア 徹底 マス 夕一 

2, 58。 円 U FORTRAN 徹底 マスター 

2.500R ■ 受験 用語 八ンド ブック 
2, 600 円 罾 情報処理 入門 I 基礎知識 
1.550 円 罾 情報処理 入門 II 関連 知識 

' ,860 円 ■ CASL で 学, 3i アセンブラ 入門 
'，円 ■ そっくり 模擬試験 


アセンブラ 


市 市 巿市市 市 市 市 市 巿巿巿 市 市 £i 市 巿市 市 市 g す 0 

：ク橘 W 田 川谷时 W 阜ー 5" 児 M 訪鹿 都な WW グ戾 阪"" "グ" ^""々方 槻が 戸" グ "8E 

費 岡豊 S 刈 春 一 岐大 可ん 津四鈴 ほ 京 奈大 枚 ほ 東 神 S 


アプリ ケ， I シ ョ ン 


さみち、 今 曰から 局長さん 



XlBBOOOmm 

多 回線 ホス 卜 ソフ卜 


PRO-60K 



HOST 9 


PRO-60K 


概要 


S 德 回線 数 1 〜9^51 線 

使用 モデム AT モデム MNPCRTS CTS) 可 
通 培 速度 «X9600bps 
会員 数 * 最大 9999 人 

掲示板 数 * 最大 40 個 

機能 電^掲示板 • 電子 手紙 • 電子 会議 (チヤ ッ卜） • 会員 情報 

これら は、 コン フィグ ファイルで 設定で きます。 

注 1:* 印に ついて 拡張 を 希望す る « 合 は、 フ ryj う しの靈 
別 料金に て 対 ® 致します。 当社まで ご 相談ぐ ださい。 
2:2 回 緑 以上で 運用され る « 合 は、 CZ- 6BF1 (シ ヤー フ 純正：) が 必要になります。 
3: この ホス 卜 は テキス 卜 形式の 転送 方法 を 採用して おります。 


5 換えが 必要になります ので、 


酾 特長 

* 各種 設定の コン フィグ ファイル 化。 *RS-232C 回線と は 別に キ一 ポ一ド からの アクセス、 ダ 
ゥン ロード、； ^ソフ0 —ドが 可能。 需 モニタで、 各 チャンネルの ユーザーの 打ち込んだ コマンド や 
通 状 釅を確 S。 • 各 揭示板 別に SIG 、ポ一 ド/ V スの 股定。 • メンテナンス 作業の オンライン 実行。 
(ボード インデックス， メール インデックス） * オンライン サインアップ 等、 ゲス 卜への 股定が 可能。 
» 通信 サービス Trl-P 対^。 * 行 編集 (オンライン 噸易 エディタ) 機能。 《 その他 • シスオペ レベ^ 

て 会 興 《 報の 変更が 可能。 タイ 厶ァゥ 卜に よる 回 糠 切断。 pds® 用 掲示板の 採用。 a 靈込 中で、 ド 

キ ュメン 卜と テキス 卜 フロ ゾラ 乙の 分離〕。 * 接続 MNP タ イブの 識別。 ♦ ログイン、 ログ ァゥ卜 時 
間の 記録。 • 非 アクセス 時の モニタ 画面 消去 巧 能。 


？ O-60K 


HOST 3\ 

锼能は 統べて、 r HOST9^m% , と 同じです ガ、 対!^ 回線 数が、 
1〜3 回線に 制限され て、 低価格で ユーザ一 に 供給し ます。 


ーソ ヨン アップ （VeN.10) 
サービス 実施 中 

現在 発売され ています 製品 は、 Ve「 1.10 に 変更に なって 
います。 お使いの 製品が VeM. 00 の ユーザーの 方の だめ 
に、 バージョン アツ フサ一 ビス を 実施して おります ので、 
お 早目に、 ユーザー 登録 葉書 をお 送り 下さい。 
Ve「1. 10 へ 無料 交換 を 実施して おります。 

好評 発売中 

host 9^^^ ¥59,800 円 
host 3^^^ ¥39,800 円 

TSUKUMONET モデル 運用 中〃 


ユーザー 鍾$ の is を s 親して 
好評 発売中 

17-BOO 円 

24/31 KH Z 

ディ ス ブレイ 



SS6BOOO QDO-MCTtel 

使用 I^L_ I (0245)46- 1167( 代 1 


2 


「た〜 みのる j ガ 
おい も 新たに 

「だ〜 みのる 2 」 として ®» ノ 
,み のる _)ガ 


信 人 M 版なら 

s 〜み a 


ノ、' ソコン 通信、 


> のる 2」 は 
マニア タイフの 通 《 ソフトです/// 

r c 〜みのる 2 」 は xeeooo 用に » 作 asncia« ソフ 卜で 

X t ,i!UlJ')0-i»rr. '- '' ：し、 ：1;1 に I - -r r;,n','/rOT!'l> 

に » 作て s る rf: う 工夫' w さ n てい；? ： "？ - 


プログラマ 募集 ガ 

SPS で ゲーム を 作って みません か 7 

アセンブラで プログラ^の 組める 優秀な 人材 を 若干 名 募集して い 
ます。 就職 希望の 方 は 62 円 切手 同封の 上、 「就職 案内係 大和」 ま 
でお 手紙ぐ ださい。 折^返し 就職の ご 案内 をお 送り 致します。 
尚 、デザイナー、 音楽 フロ グラ^ 等の 専門職 は 募集して おりません。 


(株) マイコン 八 ウス 



T960»Sai;K 平? S?B] ノ內 
FAXI02 


1(0245)4! 
5-lfl04(G 


45-5777 
に Gill) 


I 表示 価格に 消費税 は 含まれて おりません。 いい T 


当 はの は 全 B の: デバ一 ト、 バソ 
コンシ s ッ プで お求めに なれます， f*K お 

求めに なれない 塌台， にて お申し 

込みく た-さい. 》ロ3»号 tB 山 5-12298 
* 加入者 ス' ビー 'エス (t 
A に 3% の 消 資はを 加算した 
(裏 ffi) ご ゲーム ソフ hfi.B 霞， 代金 
含1れ 年 《, 氏 も， «» 名 、テープ か ディ ス 

クの aw 以上 かか リ ますので， 
お » ざの 方 は a 金 害 » を ご 利用 く たさい, 
その 場 台 > おつりの いらない ようにお « 


好 評/一般 回線 

運営 中 / (9 回 線） 
(4 回線）/ MNP クラス 7 


24 時間 運営 (N81XN) 
ゲス卜 ID(GUEST) 

«GU EST アクセス は 無料です ので ぜひ、 
—度 K して < ださい。 


A^-frS±, 登録料 ¥3,000( 税別） 
S/J ilx 会 黄 無料 

の) lift に g 接^ 入す るか 又は、 コ ビーして ie 人し. 72 円 

り JT:1， 柑のヒ r SPS-NET 係」 までお 送り 下さい。 W き 次第、 
錄を 行い ID 発 JfftSPS-NET 專用 《8 便 脇 み 用紙 
ならびに «W の 手引き をお 送りいた します。 それに «ぃ,3 ケ 
リ以 内に ほ鉍料 3,0001 リ (船リ) を 卸 人 金 下さい。 
人 金 確^ 後 il: 式 会 i I として HfU^ します。 


例 1 ' 'パスワード 二 SPS-NET @ 職業 = 株式会社 エス 'ビー' エス (1 紋 字まで） 

( (85 字まで 大小 文字の 制 あり)、 ( \ 

◎ 本名： 大和 大 五郎 (8 文字まで） 所 = 福 島 市 太平 群 町ノ内 5-3CM 文字まで） 

© ベン ネ一 乙 =大 ちゃん 〔4 文字まで） © 自己紹介 二 SPS-NET をよ ろしく 

/ \ ( (24 文字まで)、 


( 0) 年齢 =30( 現在の 年 15) 

◎ 電話 二 0245- 45- 5777( 市外 局番から） 


◎ システム 溝 成 =X6 画 ACE-HD MD2400B 
/ (18 文字 まて) \ 



き 霞 


高価 下取り、 
買 取りいた します、 
お問^ 


S 03(253)7661 


〒101 東京都 千代 田 区 外 神 田 3-2-3 Q03- 253-761 1( 代) 


今す ぐ もよりの 電話から 

仙 台 08S-264-3704 

名古屋 052-452-3871 

広 島 DB2-E95-BB73 

札 幌 01 1 -61 1-51 04 

新 潟 0252-75-4175 

大 阪 D6- 31卜 3931 

福 岡 092-481-8494 



Welcome/ 

ご 来店 もどう そ:, 


X68000 の 情報の すべで/ (当店 は X68000 の 認定 代理店 ビす。 お 気軽に こ '相談 下さ ゆ 



待望の 新しい 仲間 登場, 


^7 


B8000 


PERSONAL WORKSTATION 

EXPERTS EXPERTH 


HD 



f^603C， 標準 痕格, ¥ 338,000 
CZ-613C 標> 価格 ¥448,000 


EXPERTI- 
EXPERTH HD 

集積 度 を 高めた 1 " マン ハツ 
タン シ エイ プ" 3M の大 容量 
メモリ を 搭載。 本格的な ゥ 
イン ドウ システム、 SX-WIN- 
DOW 搭載。 


臭の モニタ は 別売です,〕 


AVC 特価 



PERSONAL WORKSTATION 


…、〜'、〜 バリ リ" 

tPRon-PRon SIE 


PROn-PROH HD 

拡張 I/O ポート を 4 スロット を 搭載し、 汎用 
性と 低価格が 魅力。 
も^) ろん、 SX-WINDOW 搭載。 


き さ 


(写 臭の モニタ は 別 * です.） 


CZ-653C 標準価格 ¥285.000 
CZ-663C 標準価格 ¥395,000 


AVC 特価 


CZ-8PC4 

お勧め ディスプレイ コーナー 組合せ は 自由、 価格 はお 気軽に ご 相談 下さい。 

1 

m 

48 ドット 熱 転写 プリンタ 
一， 精密な 文字、 ハード 

3 ビー も 可能 o 

C^-6D4D »(Ulnim 卜 1 ヒゾ 

標準価格 VS4.800 *2 モート-オート スキャン 

AVC 特価 • ステレオ スビ— カ搭 《 
♦ チルト 台同梱 

/^フー 613D • ドット ピッチ 031 mm 

標準価格 ¥135,000 參 TV チューナ一 搭載 

AVCM * ステレオ スビ— 力— 搭 》 
■ J 1、 * チルト 台同梱 

CZ-603D * 031 ， ドット ヒッチ 

裸 * 価格 ¥84.800 »TV チューナ 無し 

AVC 特 ィ面 " モ— ド才— トスキ ヤン 
* チルト 台同梱 


CU-21HD 隱ドソ トビ ツチ 

«(ぁ 価格 VU8.000 *21 型 ディ スフ レイ 

AVC 特価 " モ- ドォ- トスキ ヤン 
* ステレオ スピーカ 搭戰 

C 7 ~R05D * トツ ト ピッチ o. 33mm 

標準価格 ¥115.000 *TV チュ一 ナ一 搭載 

C7"6n2 r * * ド- ノト ヒッチ。. 3Smm 
樣準 価格 ¥99,800 ⑩" TV ナュ 一ナ一 搭載 

AVC 特価 • チルト 台同梱 



CZ-8PC4 ■■■■■ ¥ 99,800 

AVC 特価 ¥ ？?? 

AVC 特価 • ステレオ スビ— 力— 搭" 
參 チルト 台同梱 


セ 

ッ 

卜 

の 
組 

せ 
は 
白 
由 

9 

広 

に 
出 
て 

な 

他 
の 
捩 
種 
は 
お 

ム 
せ 
下 
さ 


UB8000 


PERSONAL WORKSTATION 

SUPER 


HD 



80MB ハード テマ スク、 
SCSI インタ 一フェース 
搭載./ 
CZ-623C-TN 

¥498,000 

CZ-613D-TN 
¥135,000 


AVC 特価 


お 電話で 


X68000 PRO-EXPERTSET 


• CZ-602C & CZ-603D - 
•CZ-602C & CZ-602D 
•CZ-602C & CZ - 613D 
•CZ-602C & CZ-604D 


定価 ¥440,800 
定価 ¥455,800 
定価 ¥491,000 
定価 ¥450,800 


特価 ¥292,000 
+ 特価 ¥298,000 
+ 特価 ¥335,000 
+ 特価 ¥298,000 


に Z-652C & CZ-603D - 
►CZ-652C & CZ-602D- 
ICZ-652C & CZ-613D' 
に Z-652C & CZ-604D - 


定価 ¥382,800 
定価 ¥397,800 
定価 ¥433,000 
定価 ¥392,800 


吟 特価 ¥254,000 
+ 特価 ¥258,800 
特価 ¥300,000 
+ 特価 ¥263,000 


,CZ- 612C & CZ - 602D - 
に Z - 612C & CZ - 603D ' 


定価 ¥565,800 
定価 ¥550,800 


蜂 特価 ¥375,800 
^特価 ¥365,800 


に Z-662C & CZ- 602D ■ 
に Z- 662C & CZ-603D 


定価 ¥507,800 
定価 ¥492,800 


+ 特価 ¥329,800 
吟 特価 ¥319,800 


※セットで お 買 上の 方に、 SX-WIND0W, ジョイ カード、 "グ ラデー ウス" デ イス 
ケット 10 枚プ レゼ ン卜/ 


拳 M 金な し (手 6 な 電話 クレジット） * 製品 先取り (お支払い は 約 卜 2 ヶ月 後から） * 低金利 クレジット （I 回の 支払い は 2.700 円 以上で 3— 48 回。 ポ一 
ナス 併用 も 可） * カレッジ クレジット (保証人な し。 但し 満 20 綾 以上の 学生の 方） * 18 歳 未-; « の 方 （ご 両親が 代理 購入者と してお 申し込み 下さい） 
* 納期 (通常の場合、 当社に 申込 害が 到着 後 I 週間 以内。 特に 人 51 の ある 商品で 品薄の 場合、 少々 納期が 運れ る 二と があります ので 御了承 下さい） 
鲁先全 保 K (すべて メ一 力一 保 SiE 番付。 アフターケア 万全） ♦ 全国 代 引 （お届けした 者に、 代金 をお 支払いい ただく 方法です。 但し 手数料 1,000 円） 


AM10 時から PM7 時 

まで 受付 曰 曙 • 祝 曰ち 堂 業 


ProIJ 

CZ-653C …，"^暴。' 
CZ-603D …- ¥-84f8flS 
：定; (i 合計… _、'36^| 
Basic HdLise 特 1 (き 


Su^WMfM 

Ezi623;(SgN^^B™30l 

Ba^ijaB5ouisew ; (ffi w 


"BlsioiiSoCis^PfP 


台数 限定 電子 手帳 特別 セッ卜 

PLAY THE MIDI MUSIC 

A SET 

B SET 

A SET 

B SET 

CSET 

PA -8600 

PA -8600 

CM-32L 

CM-64 

ivrr-32 

CE-20O し 

CE-20O し 

SX-68M 

SX-68M 

SX-68M 

CYBERNOTE PR068k 

Stationary PR068k 

MusicStudio Mu-1 

MusicStudio Mu-1 

MusicStudio Mu-1 

Basic 特価 ¥41 舅 

Basic 特価 ¥37,800 

Basic 特価 ¥93,000 

Basic 特価 ¥1 43,000 

Basic 特価 ¥88，GGG 


X68000 用 八ード ディスク 

アイ テック ITX-680 

アイ テック ITX-640 

アイテム HXD.040 

アイテム HXD-042 

ロジ テック SHD40 


^is&reot) 

Mi4«re00 

Mi28r0OO 

Basic 特価 

シャープ CZ-64H Basic 特価 

xmooo 用 s5si 予約 大 募集 

シ ヤー フ 

光磁気 ディスク ユニット 

CZ-6M01 予約 受付 中 

SCS は: ード 

CZ-6BS1 予約 受付 中 


X6 咖 (SPRINTER'S 

シャープ CZ-8PC4 

シャープ CZ-8PG1 

シャープ CZ-8PG2 

シャープ CZ-PK10 

ェプソ ン AP-850 

ェプソ ン AP-550EX 

ェプソ ン VP-1350 

エプソン VP-2050 

NEC PCPR201GS 


M_-62r800 

Basic 特価 
Basic 特価 


ス 夕 一CR-3415CL Basic 特価 


通信 関連 品 

NEC COMSTER2424/4 Basic 特価 

NEC COMSTER2424/5 Basic 特価 

OMRON MD24FS5 

OMRON MD24FS7 M-64r800 

CommunicationProV2 ^_49r800 

た ~ みのる 2 ざ_4^00 


ゲーマー 必須 アイテム 

CYBER STICK 

XE1-AP 

XE1-PR0 

XE1-ST- 


クラ フィック ツール 

スキャナ パラレル ポー ド ^29r800 

CZ-8NS1 M-4*r8tI0 

GT- 6000 Basic 特価 


GT-1000 M-?9r«00 

HS-10RII ^J^m 

HS.7RII M-39r800 

cz-6vpi ^m^m 

IO-735X j£248re00 

ジーズ スタッフ PR068K Basic 特価 

デジ タルク ラフ ト ^J^WO 

マジック パ レツ ト Basic 特価 

サイクロン Express ひ 68 ^_98re00 

全国 どこでも 発送 可 長期 クレジット ok 送料 全国 均一 ¥1.000 宅配便に て 即日 配送 


その他 周辺機器 

拡張 I/O BOX 

アンプ 内蔵 スピーカ —— 
カフ — f メーン ュニッ ト 

ビデ オボ一 ド 

RGB システム チューナー 
CR 丁 フィンレター 


CRT 

CU-21HD. 
CZ-605D- 
CZ-604D- 
CZ-613D- 
CZ-603D-- 


NEWS 1 


ロケ ッ トキ ャッシ ヤー 完成 ！ 
新ァ ルゴ リ ズ厶の 採用 に よ り 従来 比 約 3 倍の 
高速 化 を 実現。 

ハ一 ド ディスク キ ヤッシャ一 のみの バ一 ジョ ン アップ 
となります。 旧製 品の ディスクの ラベル を 同封のう え、 
1 ,500 円 （送料 • 税込） を 現金 害留 でお 送 リ 下さ い。 


NEWS 2 


ビデ オボ一 ド （CZ-6BV1) を 外付け に！ 
ビデオ ポー ド 1| 又納 ケース （KGB-BVBX) 

近日 発売 予定 （通信販売 のみで— 般 販売 は 
しません） 


ijb-^^WS—I^Blli*}?!! 本社 営業部/マイコン ショップ/通 販部 宇都 宮市 竹林 町 503— 1 TEL0286-22 9811 
15f:j.V,3XfXpl iH'JlXWr 大田原 営業所 ノ マイコン ショップ 大田原 市 美 原 1—13—4 TEL0287-23-5352 


03 — 1 TE し 0286- 22- 981 1 FAX 0286 -25 3970 
13-4 TEL0287-23- 5352 FAX 0286 -23 5364 


'イコン ショップ 


お申し込み 'お問い 合せ は 0()^fl6-^^-9877( 代) 



micro computer shop ^ 

'iT 森 や w , ■ 


宇都 宮店& 大田原 店 


PRO SHOP 1 


コ秦 



競輪場 通：： 


駅前 大 通：： 


〕 


充実の BASIC HOUSE 八 一 ドウ エア S ソフトウェア 


高速 12BITJ6CHA/D コンバータ ボード （KGB-AD12) X1 ¥118,000 
フォト アイ ソレ一 シ ヨン 16BIT デジタル 入出力 ポ一ド （KGB-PIO) X1 ¥ 42.000 
ハードディスク インタ一 フエ一 スボ一 ド （KGB-HDIF) XI ¥ 16,000 

アイ ソレ— シ ヨン 16 日 ぽ デジタル 入出力 ボード (KGB-X68PIO)X68000 ¥ 68,000 
ハンディ プリンタ & インターフェース （HANDYPRINTjack)X68000 ¥ 24,800 


高速 12BIT,4CH D/A コンパ一夕 ボード （KGB-DA4) XI ¥ 98,000 

汎用 ローコスト A'D&PIO ボード （KGB-X1S) XI ¥ 19,800 

高速 12BIT,16CHAZD コンバータ （KGB-X68ADC) X68000 ¥128,000 

64180CPU ボード Mach180(KGB-GPXB) X68000 ¥ 98.000 

ローコスト MIDI インターフェース （MELODY BOX) X68000 ¥ 16,800 


BASIC 拡張 関数 パッケージ (B6-6301) ¥9,800 
ディスク キャッシャー （B6-6304) ¥6,800 


C 言語 ライブラリ （B6-6305) ¥6,800 
Toys & Tools (B6-6307) ¥6,800 


BAS に 拡張 関数 パッケージ C 言語 ライブラリ 付 （B6-6306) ¥ 14,800 

アイコン エディタ （B6 -6303) ¥4,800 CP/M68KI ミュレ- タ (B6.6302) ¥ 19,800 


PRK ニュー バリエーション 販売 開始/ PRK10 コプロセッサ 付 Z メモリー 無し 定価 ¥72,000 


BASICHOUSE BBS TECOSYS NET 


TEL 0286-27-1829 /1200/2400 ボー MNP クラス 5/8 ビット/バリ ティ 無し /X 制御 無し 
ゲスト ID なし (オンライン サインアップ） ― 


全国 どこでも 発送 可 長期 ク レジ ッ ト OK 送料 全国 均一 ¥1,叩0 宅配便に て 即日 配送 


ijt + ^i+S+^BlliJtTaf 本社 営業部/マイコン ショップ Z 通販部 宇都 宮市 竹林 町 503— 1 TEL0286 22 9811 FAX 0286 -25- 3970 
W XV, p I /DIJ fXWT 大田原 営業所 ノ マイコン ショップ 大田原 市 美 原 1—13— 4 TEL0287- 23 う 352 FAX0286- 23- 5364 


'イコン ショ ップ 


お申し込み 'お問い 合せ は ^^—9077(1^) 


2 枚の ボードが 1 枚に なった 




. ■ ■ ： ■ -- 

威ま^^ 



※写真 は KG 已 -X68PRK-14 て" す 

製品 価格 一覧 


広大な メモリ 空間 を 実現す る 最大 4M バイ 卜の 

高速 増設 メモリ 


高速 演算 を 約束して くれる 

数値 演算 

プロセッサ 

• メモリ アクセス ノ一 ウェイト による 高速 アクセス 

• CZ-6BE2/CZ-6BE4/CZ-6BP1 との 混在が 可能です 
* 複数 枚の KGB-X68PRK の 実装が 可能です 

きジ ヤン パの 変更に より 任意の アドレス 空間に メモリの 配置が 可能 
です 

♦ ジ ヤン パの 変更に より 数値 演算 プロセッサの 1 枚 目 2 枚 目/未使用 

の 選択が 可能です 
• 1M/2M.Z3M メモリ モデル は 購入 後に メモリ を ボード 上に 追加 可 

能です 

• 数値 演算 プロセッサに はデノ 、'イス ドラ イノ く （FLOAT3X) 力、' 付属し ます 

*CZ-602C/CZ-612C 以外の 槻榧 では CZ-6BE1/CZ-6BE1A を 実装して いる 必要が あります 

• メモリ アクセス ノー ウェイトの ため 拡張 I/O BOX では 動作し ません 


KGB-X68PRK-01 ¥ 58,000 

(1M メモリ/数値 演算 プロセッサ 無い 

KGB-X68PRK-02 ¥ 74,000 

(2M メモリ/数値 演算 プロセッサ 無し） 

KGB-X68PRK-03 ¥ 98,000 

(3M メモリ/数値 演算 プロセッサ 無し） 

KGB-X68PRK-04 ¥122,000 

(4M メモリ '数値 演算 プロセッサ 無し） 


KGB-X68PRK-11 ¥ 96,000 

(1M メモリ/数値 演算 プロセッサ 付き） 

KGB-X68PRK-12 ¥ 112,000 

(2M メモリ/数値 演算 プロセッサ 付き） 

KGB-X68PRK-13 ¥136,000 

(3M メモリ,/ 数値 演算 プロセッサ 付き） 

KGB-X68PRK-14 ¥160,000 

(4M メモリ/数値 演算 プロセッサ 付き） 


購入 後の 增設 費用 


メモリ 

1M バイト 
2M バイト 
3M バイト 


¥24,000 
¥51,000 
¥76,000 


数値 演算 プロセッサ 
MC68881RC16 ¥38,000 



プリンター セット コ一 ナ一 


4 セット 限り 


オーエー ブレイン 今月の 特価品〃 台数 限定 お 早目に.〃 



国通販 


• オーエー ブレイン 

^ ■ lit 舌く k 、ネ / ^03-5688-3621 


• オフコンから パソコンまで 
幅広〜 い 品揃え。 おまかせ あれ^ 



★ 全 商品 保証書 付 。専門の アドバイザーが お客様の ニーズに 親切に 対応し ます。 
★ 初期 不良 • 輸送 トラブル 等に 迅速に 対応し、 即 交換 させて いただきます。 

★ 送料 は 1 個に つき ¥1,000 です。 （※一部 離島 は 除きます。 お 問合せ 下さい。） 


> ご注文、 お 問合せ は… 毎日 午前 1 0 時から 午後 8 時まで 

> 下 取， 買 取 は 電話で 見積り してお ります 。責任 を 持って 下取り させて 頂き 3 

> 商品のお 届け は …入金 確認 後、 即日 発送 致します 0 


OAB 特選〜 X88000 シリーズ セッ 卜 （ゲーム パック • ディスケット 付） （税 抜き） 


① X68000EXPERTII 


• CZ-603C-BK/GY 
参 CZ-605D-BK/GY 

• MD-2HD 20 枚 ― 
定価 合計 ¥ 453,000 



(DX68000 EXPERTII-HD ③ X68000PROII 


► SX-WINDOW 搭載〃 


► CZ-6I3C-BK/GY 

► CZ-605D-BK/GY 
»MD-2HD 20 枚 


• SX-WINDOW 搭載〃 


定価 合計 ¥563, 000 


• CZ-653C-BK/GY 

• CZ-605D-BK/GY 

• MD-2HD 20 枚 ― 
定価 合計 ¥400,000 


④ X68000PROII-HD 


OAB 大 特価 


CZ-663C-BK/GY 
CZ-605D-BK/GY 
MD-2HD 20 枚 


定価 合計 ¥510, 000 


OAB 大 特価 OAB 大 特価 OAB 大 特価 


X68000 SUPER-HD'sx- 誦 dow 搭載.〃 ©X68000SUPER-HD 

• SX-WINDOW 搭載 

• SCSI インタ— フエ —ス 装備 * CZ-623C-TN (チタン） 

• 8 編 B ハ―ド ディスク 搭載 」— I «0ふ6130-丁〜 (チタン） 
*3MB 大容 £1 メモリ 装備 OTH^^^L *MD- 2HD20 枚 

• 高 解像度 グラフィック 


X68000 EXPERT-HD 二 特選 限定 品 



XB8000 EXPERT-HD 

>GZ-6I2(BK) 

(定価 ¥466, 000) 
>CZ-605(BK) 
(定価 ¥ I 15,000) 



定価 合計 ¥ 633 , 000 JHHUH^ 定価 合計 ¥ 58 1 , 000 

OAB 大 特価 OAB 特価 ¥368,000 


特選 CRT 

► CZ-605D 

(¥ I 15,000) 大 特価 Z/ 

► GZ-6I3D 

〔¥135,000〕 大 特価. グ 

► CZ-604D 

〔¥ 94,800〕 大 特価 

► CU-2IHD 

(¥ 148,000) 大特ィ 面// 


周辺機器 コーナ- 


■0 DATA 増設 RAM ボード 


X68000 用 ソフ卜 ウェア 一， コーナー 



ドライ プ'ュ 二 化 

アクセル 

• FDC-357 …… 特価 ¥36,000 

• FDC-358 特価 ¥49,000 

コンピュータ *リ サーチ 

*CRC- FD3-5S '特 «5¥29,000 
•CRC-FD3.SW. 特価 ¥42,000 
グローリア 
•GD-35MI …… Wffi¥23,000 
•GD-35M2 特価 ¥39,000 

線 電子 

•Little-FI 特価 ¥26,000 

• LiUle-F2 特価 ¥38>000 

SNE 

•SNE-z 特価 ¥49,000 


• C2^6PVI (カラ— ビデオ プリ》—） 

定価 ¥198,000 ► 特価 ¥152,000 

»CZ"8PG3(24 ドット 熱 $ 云 写 カラ— プリンター） 

定価 ¥ 65,800 ► 特価 ¥ 53.000 

» CZ-8PK 1 0 (24 ビン 漢字 ドツ ト プリ 、力— • 1 36 桁） 

定価 ¥ 97,800 ► 特価 V 73,000 

»CZ4PGI(24 ピン カラ— 漢字 ドット プリ》 —'80 珩） 

定価 ¥130, 000 ► 特価 ¥ 98,000 

» CZ-8PG2 (24 ピン カラ一 漢字 ドッ ト プリ 》一 • 1 36 桁） 

定価 ¥160,000 ► 特価 ¥119,000 

II0735X( カラ一 イメージ エツ トブ リン ター） 

-…… ► 特価 ¥185,000 

CZ-8PC4( 定価 ¥ 99,800) 

// 


0CZ-2I2BS (BUSINESS) 定価 ¥ 68 

② CZ-KOBS(DATA) 定価 ¥ 58 

'3 ! CZ-2l5MS(Sampling) 定価 ¥ 17 

■?'CZ^IHS(NEW Prml Shop) …- 定価 V 10 

tCZ-227BS(TOP 財務 会計） 定価 V 200 

i5;CZ-226BS(CARD) 定 

(7;iCZ-223CS{Communicabion) 定価 ¥ 19 

18 CZ-2I3MS (MUSIC) 定価 ¥ 18 

1CZ-ZIILS{C compder) 定 l¥ 39 

.[aC-TRAGE(+t ス ト》 定 (IV 

(0£W (イースト） 定 flBV 


特価 ¥ 53.000 
特価 ¥ 45.000 
特価 ¥ 13,800 
特価 ¥ 15,500 
特価 ¥158,000 
特価 ¥ 23,000 
特価 ¥"5,500 
特価 ¥ 14,800 


特価 ¥ 52,000 
特価 ¥ 2 画 


X680IDO 用 周辺機器 コーナ- 


き 48 ドット 熱 転写 カラ- 

漢字 プリ》 一 


特価 meoi 



秦 CZ-6BEIB 

■■ 定価 ¥ ； 

8,0(10> 特価 ¥ 22,000 

• CZ-6BMI-- 

-- 定価 ¥ ； 

6,800> 特価 ¥ 21,000 
8,000ー 特価 ¥ 69,800 

• CZ-SEBI '' 

■■ 定価 ¥ £ 

• CZ-6VT I ■■■ 

-- 定価 ¥ E 

9,800^ TEL 下さし、 

• CZ-8NSI •■• 

-- 定価 ¥ IE 

8, 00ル 特価 ¥149,000 

• CZ-6BCI •■■ 

"定供 ¥ 7 

9,800^ 特価 ¥ 63,000 


今月の 特価品 (限定) お 早目に // 


★CZ-652C(BK) +CZ-602D(BK) 

] 大 特価 ¥258,000 

• SHARP WD-A300( ヮ一 プロ） 

定価 ¥165,000 特価 ¥110,000 


• SHARP WD-A330( ヮ一フ 
定価 ¥ 185,000 

• SHARP WD+ Hl_30( ヮー 


特価 ¥125,000 
特 fiE¥1 34,000 


• SHARP PW-3I0( ヮ一 プロ） 

• NEC PC-KD853( アナ c^CRT) 
» 三 (アナログ CRT) 

• SHARP GU-I4FD (アナログ CRT) 

• SHARP PA.8500( 電子 手帳） 


特価 ¥ 85,000 
特価 ¥ 50,000 
特価 ¥ 54,800 
特価 ¥ 46,000 
特価 ¥ 1 6,000 


► 1MB 増設 PAM ボード 

PI0-6BEI-A 



• 2MB 増設 RAM ボード 

PIO-6BE2-2M 

定価 



* 4MB 増設 RAM ボード 

PIO-6BE4-4M 

定価 


特価 ¥18,800 特価 ¥37,800 特価 ¥65，800 


I 八ード ディスク 國 特価品 もあります ので TEL 下さい 


攀 アイ テック ITX - 640..-' 
參 アイ テック ぽ乂- 680 -… 

* ロジ テック LHD-32V-' 
攀 口 ジテ ヅク し HD—34VE 

* ロジ テック LHD-34V-' 


特 i ¥11 7,000 
特価 ¥149,000 
特価 ¥ 85,000 
特価 ¥ 90,000 
特価 ¥104,000 


"—フ CZ- 620H' 


'アイテム I 
• アイテム I 


特価 ¥11 8,000 
特価 ¥ 95,000 
特価 ¥ 88,000 
特価 ¥ 95,000 
特価 ¥130,000 


中古 パソコン （価格/在庫 は 変動し ます。 予約 は 5 日 以内と します。） 


-980IRX2- 
-980IEX2- 
-9801VX2I'- 
-980IUX2I- 
-980IVX2-- 
-980IVM2I ■ 
-9801UV1 I - 
-9801LV22- 

-286VE 

-286US …… 


¥338,000 よ 
¥265,000 よ 
¥199,000 よ 
¥190,000 よ 
¥170,000 よ 


¥160,000 よ 
¥150,000 よ 
¥148，000 よ 
¥160,000 よ 
¥150,000 よ 
¥155,000 よ 


PC-286VS 
C2-600C-- 


¥165,000 より 
¥160,000 より 
¥170,000 より 
¥198,000 よ'； 
¥178,000 よ', 
CZ-6I2C ¥210,000 よ 1 , 

68000 用 モニタ一 ¥ 49,000 より 

pc-9801 用 サウンド ボ一ド ¥ 13,000 よ'. 1 

PC-88SR, FR ¥ 50,000 よ 1 . 1 

PC-88FH, FA ¥ 65,000 よ" 

400 ライン crt ¥ 38,000 より 

200 ライン GRT ¥ 10,000 よ '1 


通信販売 による ご 購入 方法 （お 電話で お申し込み 下さい。） 


現金一 括 払い クレジット •mrvwu.... 


«1 行 》 込 ： 《1S« いに てお 16 込 下さい 冉 用のお' 申し込み 用 i 氏 をお 送り ft します 動 業 銀行 御徒町 支店 

手 》14 はお *«»但 となります のて.' JZ. 要 *頃 を 二 K 入' ほ E|] のうえ-二 （蔷） 1376679 才— ェ— フレイレ •CRC- FD3-5S '特《¥29,000 •,^ 050PC 特《6¥ 93,000 g .1^« ¥ 

現金 書 h ： (±sn. 氏名. ut は あ 号. fa 品名. 使用 《«, 返送 下さい 》*flg は fflAjr " — •、' * 

メ ティア S をお 癲さ. あえのう え. 現金 書 S: 二 * 未成年者の 方 は， 保 ほ 者の 二 ふ はも _ ォ ェ_ フレイ:/ ソ u—'i r 

S 钍 まてお 送り 下さい 受けてから お申し込み 下さい （»)334833 ^ 1 " *QO-35MI 特優 ¥23,000 サヮ ノト -' パート ヮーノ J 

★ クレジット は I 一 60 回 払いで 月々 5, 000 円より 二-自由に 設定で きます， _»_00-35|^12 '…一 W 優 ¥39,000 | ゥン は— ケス トラい ■. « ffiV 23.000 f^^wP.WHR ««¥17 


#Ji_ T — ^11 >V^it110 東京都 台 東 区 台東ト 28-4 =:^::::::SS§g:888 ョ H ま银ョ IIS,;§§§ ii3 D ::::::: Hi 招 
i| I I I MW\ M —―. -. SNE 6 リトルし一 シ シャン ■ ■ «価¥ 8,500 fJW-^F W(ffi¥1「 

/| 丄 ノ！ / |< TT 


c N £ 6 リトル ミ-， ーシ シャン TOtfliV B,SOO * JW-95F Wffl¥10 

itLS Fma 5688 一 362 1 * sne - z 特 ffi¥49,ooo B^^^^ss^ 


ブリン ター 


NEC 

• PC-PR20IG + 
PC-PRZOIG-Od 

• 1 50 -- 

I フ ソ ン 

• AP-850PC 

• VP-2050PC---- 

キャノン 

• BJ-(30J" 


'漏 Y 99, BOO 
4iifffiV132,O0O 

USfiSV 64,000 
価 ¥ 99,000 

W(a5¥125,O0O 


サウンド 'ボード 


t-'-fffiVI 7,800 
1;', 価 Y14.500 
M 価 Y12，000 
1VfaiV16-O0O 

nmy 8.500 


流通 事情に より、 広告 表示より お 安くなる 場合 も ございます。 まず は、 お 電話 下さい。 固 ビジネス • ゲーム セッ卜 も ございます。 


セッ卜 超 特価 
SX68000 

PERSONAL WORKSTATION 

PROS' PROElffDl 


CZ-653C 
CZ-B04D 

セッ卜 ¥ネ 寺 価 

¥24,000 xi am 

¥12,700X24 回 


CZ-B53C 
CZ-B05D 

セッ卜 ¥ 特価 
¥25,300 XI 2 回 
¥13,400X840 


セッ卜 超 特価 

SXB8000 

PERSONAL WORKSTATION 

EXPERTS EXPERTMHB 


CZ-6B3C 
CZ-BD5D 

セッ卜 ¥ 特価 
¥32,200 xl 2 回 
¥17,000X24 回 


CZ-663C 
CZ-613D 

セッ卜 ¥ 特価 
¥33,500 XI 2 回 
¥17,700X24 回 


CZ-B03C 
CZ-B04D 

セッ卜 ¥ 特価 
¥27,300 XI 2 回 
¥14,500X240 


CZ-B03C 
CZ-B05D 

セッ卜 ¥ 特価 
¥88,600X120 
¥15,100X24 回 


CZ-B13C 
CZ-B13D 

セッ卜 ¥ 特価 
¥36,800 xi em 
¥19,500X24 回 


CZ-B23C 
CZ-B13D 

セッ卜 ¥ 特価 
¥39,900 XI 2 回 
¥21,200X240 


全品 メーカー 保証 即決 ク レジ ッ卜 OK 


ディスプレイ 

CZ-B04D 特価 

CZ-605D 特価 

CZ-B13D 特価 
CU-21HD 特価 


プリン 夕 
CZ-8PC4 特価 
CZ-8PG1 特価 
CZ-8PG2 特価 

IQ-735X 特価 


周辺機器 
CZ-8NJ1 ¥1,400 
CZ-8NJE ¥18,540 
PIO-6BSA¥20，000 
PIO-6BE2 ¥39,000 


ソフ卜 
CZ-213MS ¥15,500 
CZ-EE3CS ¥15,300 
CZ-219SS ¥23,100 
CZ-211LS ¥30,800 


お申し込み 

TE し 0482-54-3400 
FAX.0482-54-3443 

埼玉県 川口 市 西 川口 4-6-4 


24 時間 テレホンサービス 

0482-54-3444 


お支払い 
下記 取引 銀行口座 
までお 振込み 下さし^ 
三菱 銀行 西 川口 支店 

㈱テン キヤ (§)0258081 


J^/ICUa TOMATO 


( OmROn mEBBBOEMma\B\l HOCEOa SONY FUJI FILM ^aravetie.ia wiitki 

さ ofrr^p 商品 は 今す ぐ/お支払い は 9 ヶ月 後から c 

For Compuler Commun cation Age 矚 ^^^^^^^^^^^^^^^^^^^^^^^ 

株式会社 ソフ マップ 冬の ボーナス 一括 払い、 冬 • 夏 2 回 払い も 受付 中ガ 


の 
表 
の 
価 

格 

は 


戲 

価 
格 
に 
は 
消 
費 

が 
含 
ま 
れ 
て 
お 

0 

ま 
せ 
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XI6B000 


SUPER-HD 
EXPERTII • 1-HD 


大 g 量 80MB、3.5 インチ 
HOW 康、 SCSI インタ一 フ 
i イス 權摩 M 情， 
SX-WINDOWffil 


基本 セッ卜 
SUPER-HD 
■ — 

CZ-623C-TN (本体 > ¥Sofmap 特価 

CZ-6I3D-TN (け' ドット ピッチ o.3i> ¥Sofmap 特偭 

マクセル ブランク ディスケット <5"2HDxio«^"¥Sof ma ロ特 ffi 


標準価格 V お 0,0 


—ポー ナス ¥30,000X12 回 


ポ— ナス ¥60,000X6 回 
ボーナス な 



. , , 集 «度 を 高めた • マン'、 ッ タン- >i"f7"-3M 
^Xp^l ン、 ソ 卜の 大容逢 メモリ、 SX-WINDOW»« 

,cx-6i3C-BK<*ft) 《Sofmap1 

^x"^6I3D-bk(i5" ドット ピッチ 0.3 け ¥SofmaDl 

きク セル ブランク ディスケッ ト ( 5'2hdxio 枚 ^'¥Sofmap^ffi 


ワープロ セッ卜 

SUPER-HQU^) 



CZ-S23C-TN (本体〉 
CZ-613D-TNm" ドット ピッチ 0. 
CZ-8PC4 く W ドット KMi 写 力 J ン夕 > 
^^が「^0「(1<1；2-251858本8ヮ-プ15>-..¥30で0130特価 

マクセル ブランク ディスケットく 5 2hdxio*s> ¥Safmap^3fl6 


根 準 価格 


¥據 話ぽ 



1 細 X6 回— 


編 


MIDI セッ卜 

EXPERTII 


I3C-BK 


-BK (本体》 

CZ.605D-BK (ぼ 下';/ トビ 7?0.39> 

CZ-6BMl<MiDi ポート ■> 

CZ-247MK 細 SIC PR0-6BK) 

マクセル プランク ディスケット <5"2HDXl0tt> - 



¥Sofmap1 
¥Sofmarf 
¥Sofmap 特価 
¥Sofmap^iai 
¥Sofmap 娜 


棵準 価格 ¥635 


¥ お: おきに て 



ゲーム S 通信 セット SUPER-HD 

圓 gtn, ' Fig^^Mf ^ W'jgL^ 

CZ-623C-TN く 本体 > ¥SofinapS 優 

cz-fii3D-TN (は' 下ツト ピッチ o 3D ¥Sofmap^ 優 

cz-8PC4<4MMi? 力 j ンタ） ¥SofmapS 優 

cz-8NJ2< アナログ スティック > ¥Sofmap*3 優 

ゲーム ソフト 2 本 (ま dVMMW 下のお U さな ソフト） ""¥50个(^[^ 優 

MD-MFS5(iiff 用 モデム 2<oobps> ¥Soffnart5 優 

CZ-257CS<COMMUN(CATtON PR0S8K Ver.I 0) - ¥SOfmapfii 

マクセル ブランク ディスケット <5 2HDxioit〉 '- ¥Sofmap^i 

¥ぉ翻 二て 

J^iHtKBHEl^B ポー ナス ¥80, 000 X 6 tBl 

ポー ナス な し 
ポ_ ナス L 


¥1(^700X841^ - 
¥1 ら 000X48 回 —L 


データベース セッ卜 
EXPERTH-I 

m 

¥Sofmap 
¥Sofmap 糖 


CZ-4I3C-BK 


-BK (本体 > 

CZ-6l3D-BK<l5 下ッ トビ ツチ 0.3I> 
CZ-226BS<CARO PR068K) ¥SofrT13P 特価 

cz-8pkio<2 化' ン：^ ン夕一 i30ffi> ¥Sofmap 特価 


標$ 価格 ¥727,600 



每本 +7、、/ 卜 

EXPERTn^p) 

CZ-603C (本体〉 ¥Sof map 特価 

cz-6 は D (ト. ッ トビ ツチ！) .3i> ¥Sofmap 特価 

マクセル ブランク ディスケット" —2HDxiott—.¥SofmaiD 特 偭 


標準 ffi 格 ¥490,000 


ゲーム セッ卜 
EXPERTII . 

國 隱 wri^^^Ji 

CZ-603C (本体 > ¥Sofmap 

CZ-605D く は' 卞': /h: 'ツチ 0.39〉 ¥Sofmap 

cz-8NJ2< アナ n グ スティック > ¥Sofmap 

ゲーム ソフト 2 本 ほ ivuoou 下の i« きな ソル ¥Sofmap 
マクセル プランク ディスケット s 2HDxiott> "wsof map 


標準価格 V513,' 


¥fiWS ば 


クラ フィック セッ卜 

EXPERTII 


圖 Kffl お vchjw^^mW^ 

cz.603c< 本体〉 ¥Sofm3P^I 

CZ-605D く ぼ 卞ッ トビ ツチ d.39> ¥SafmapftS 

Z'SSTAFFPRO6BKVer.2.0( グラフ や/^ ツール ソフト > ¥Sofmapfi 優 

マクセル ブランク ディスケット <5'2hdx 10 枚） ¥Sofma^i 

標準価格 ¥528,000 ¥^1 話 CT 


ビジネス セヅ卜 
EXPERTII 



ポー ナス V 

■：：'! (广 ：ほ 

ホー ナス V 

60,000X 4 回 

ポ一 ナス 

な し 

ポー ナス 

な し 

ボーナス 

な し 


¥ 2.400X72 回 

ポー ナス や 

28,000X12 回 


ポ一 ナス V 

48,000X613 

ボ一 ナス 

な し 

ポー ナス 

な し 

¥17,600X24 回 

ポー ナス 

な し 



ボーナス 

つ レ： 0リ 

ポー ナス 

¥50,000X6 回 

ポー ナス 

な し 

^一 ナス 

な し 

ポ一 ナス 

な し 


CZ-603C (本体 > ¥Sofmap 

cz-605D<is' ドット ピッチ o.39> ¥Safmap 

cz-8PC4<MhVH»eg:^ ンタ > ¥Sofmap 

cz-212bs く business pro6bk> ¥Sofmap 

マクセル プランク ディスケット <V2HDxiott〉¥Sof map — 

ポ— ナス V46, 000X10 回 
V68,OOOX6 回 
な 



プリンタ' 


周辺機器 



CZ-BPCJ 

定価 ¥99,80Q] 



CZ-8PG11 

定価 ¥130.000Ji 


¥ お 麵舌喊 


CZ-BPK10 

定価 ¥97',800, 


¥ お wa こ-て 3 


CZ-8EG2: 

定価 ¥.160 ,000」 


¥ お WS 頭 



5E 僅 ソフ マツ ブ特 AS 

CZ-6BEI ¥ 35,000 峰 ¥ 26,500 

CZ-6BE1A ¥ 38,000* ¥ 28,600 

CZ-6BE2 ¥ 79,800 *¥ 60,000 

CZ-6BE4 ¥ 138,000* ¥107,000 

CZ-6BFI ¥ 49,800 #¥ 38,200 

CZ-6BP1 ¥ 79,800* ¥ 61,000 

CZ-6TU ¥ 33,100* ¥ 25,000 

AN-S1000 ¥ 36.600 蜂 ¥ 28,500 

CZ-8NS1 ¥188,000* ¥145,000 

CZ-6EB1 ¥ 88,000* ¥ 67,500 


SOFT WARE 


•Z's STAFF PR068K V2.0 - ¥58,000* ¥39,700 
•DATA PRO68K(CZ-220BS) …- ¥58,000 • ¥ お 電話に て 
•CARD PR068K(CZ-226BS) …'- ¥29，800* ¥ お 電話に て 
参 C コンパイラ PR06BK V2.0(CZ-2«L5)- ¥ 39.800 ¥32,000 
•SOUND PR068K(CZ-2I4MS)-¥15,800*¥12,500 
•MUSIC PR068K(CZ- 2 13MS)' ' ¥15,800蜂¥ お 電話に て 
参 サンプリング PR0S8K(CZ-2I5MS) -- ¥ 17,800 • ¥14^000 
鲁 コミュニケ イシ 3 ン 嘛 Z 猫) '-… ¥19 細 • ¥ お 電話に て 

#OS-9(CZ-219SS) ¥29,800蜂¥ お 電話に て 

•KAMIKAZE ¥68,800 #¥46^000 


No,l システム 


No.l 下取り システム 

お持ちの 機種 を 下取りに 出して、 新品に 買 替えようと 思つ 
ている 方、 ソフ マップに 御 相談 下さい。 

K 取り 価格が どこよりも 高 《 新品の 販売価格が どこより 
も 安いから、 当然 どこより もお 得な 条件で お 買 求めいた だ 
けます。 

又、 差額 を 商品券で お支払い もで きます。 


No.l ク レジ ッ卜 システム 


1 2. 


No.l 配送 システム 

1. 到着 日 指定、 夜間 配送 システム 

お客様の ご 都合に 合わせて 配送 させて いただきます。 
機種に よって は、 夜間 配送で きない ものが あります。 

2. 代金引換 システム (冑数 料） 

係員が 品物 をお 届けに 行きます ので、 その 時に お 支払 
い 下さい。 


9 ヶ月 先からの お支払い 〇K 

スキップ クレジット を 御 利用に なれば 支払い 開始 月 を 1 ケ 

月 から、:!!! 長 9 ヶ月 先までお くらせる 事が 出来ます c 

月々 ¥1,000 からのお 支払い OK 

月 々のお 支払い 金額の 投定が ¥ 1,000 から OK。 

84 回 払い も OK 

お客様の プランに 合わせて、 1 回から 最長 84 回まで 支払 
い 回数 をお 選びいた だけます。 

ステ、 ン ブ アップ ク レジ ッ卜 

お客様の プランに 合わせて、 毎月 のお 支払い 金額 を徐々 

に增 やして いく システムです。 例えば、 1 年 目 は Y 3， 000、 

2 年 目 は V 6, 000 というよ うに、 御 自由に 投定 する； とが 

できます。 

ボーナス 8 回 払い も OK 

毎月の 支払い は o、 ボーナス 時の みのお 支払いで ク レジ 

ットが 御 利用に なれます。 回数 は 1、2 回の 他、 4'6，8 回 払 
いまで OK。 

カー ドク レジ ッ卜 

各種 クレジット カードが 店頭 だけで な 《 a< nm 
通馆 販売で も 御 利用に なれます。 烊 しく 
はお 91 軽に お問い合わせ 下さい。 
カレッジ ク レジ ッ卜 

保 liE 人な しで、 学生の 方で も クレジットが 御 利用で きます。 
(20* 以上） 


No.l サ ポー 卜 システム 

1 . 初期 不良 交換 期間 3 ヶ月 

參 万一、 お届けした 商品が 不良の 場合、 お買い上げ 日よ 

り 3 ヶ月 以内なら、 同等 品と 即、 交換 致します。 

2. 新品 パソコン 3 年 保証 

• メーカー 保証が I 年の 場合、 メーカー 保 SiEl 年 + マップ 
保 112 年の 計 3 年間の 保証になります。 

3. 中古 パソコン 1 年 保証 

• 中古 パソコン 本体 は、 1 年間 保証 致します。 （ディ スプレ 

ィ プリンタ 等 は 6 ヶ月 保 IE となります） 

4. 新品 パソコン 買 取り 保証 

#i ヶ月 以内で あれば 必ず 貢 取り 保 阯 金額で、 下取り、 
買 取り 致します。 

5. 永久 買 取り 保証 

• 古くな つた パソコン、 ス クラ ガ 寸前の パソコン でも 0匕グ 
どんな パソコン でも、 どこよ リ も^く 買い取 り ます。 



店 顬に豳 接 来られる 方 は 

C 東京 03-251 

卜 3156 C 大阪 06-647-0562 

通 僂 販売 を 

ご 利用の 方 は 

C 東京 03-253-4230 〔大阪 06-633 -7224 

FAX.03-253-489O 

札帼 Oil- B65-7030 横 浜 045-31 1-3441 広廳 082-222-0604 
仙 台 金 沢 0762-21-7045 福 岡 092-752-0044 
新灘 0352-22-6139 Sfii 05E-33E-S117 离松 0878-34-B833 

24 時圍 テレフォン サービス 

r 03- 258 -7910 

フリ-ダイヤル 商品 発送のお 問 合わせ 

m 0120-08-0113 

フリ-ダイヤル 故 理 のお 問 合わせ 

画 

1 - 0292 
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お支払い 方法 


1. 代金 引 摸 システム 

件 S か 品物 をお 届けに h さます のて、 その^に お支払い 下さい 

2. ク レジ ッ卜 

お^おて 支払い 回お. 支払い Mte 日. ホー ナスの 有無 を おっしゃって 下さい 
二 ちらから ク レシ ツト用 >ft をお^ リ » します のて. こ ss 入に^ 印の 上 こ >s ^下さ レ 

ffi 品 到 ant 、御 指定の ロ痤 から 自動 引 3 しとなります 

3. «行« 込 

お « おて 御, 主文の 上， 下 s 己 係 込 先へ «1 ま is いてお 据 り^み 下さい 

二 if たたち に&品 をお^ りします 係^ 手 》*4 はお 客 WHlg となります 


iB 東京 秋 葉 原 店 

MR Tt" 三 和 銀行 秋 葉 原 支店 (普） 1012131 

lll^ /U 口座 名義㈱ ソフ マップ 

営業時間/ 

Z 年中 參平 日 AM11:00〜PM8:00 
蘸休參 日 • 祭日 AMfO:00~PM7:00 


teJ ま^) 

旧^ マップ シャ パン 


曰 
変 
動 

し 
ま 
す 
の 
で 

切 
れ 
の 
m 
は 
御 
予 
約 
承 

ま 


〒101 
〒556 


東京都 千代 田 区 外 神 田 3 丁目 15 番 6 号小暮 末広 ピノ 
大阪市 浪速 区 日本 樣 5 丁目 7 番 17 号ソフ マップ ビル 


商品名 お 額 H 取 


XBB000 モニター セッ卜 

X68CC2-662C + CZ-600D 601D) 

¥250,000 

X68CCZ-662C + CZ-6 1 1 D/61 2D) 

¥260.000 

X68(CZ-652C + CZ-600D/601D) 

¥210,000 

X68(CZ-652C 十 CZ-611D/612D) 

¥220.000 

X68(CZ-623C + CZ-602D) 

¥360.000 

X68(CZ-623C + CZ-605D) 

¥380.000 

X68(CZ-623C + CZ-613D) 

¥390.000 

X68(CZ-623C + CZ-603D) 

¥345.000 

X68(CZ-623C + CZ-604D) 

¥350,000 

X68 ( CZ-6 12C + CZ-600D/60 lb) 

¥290.000 

X68(CZ-612C + CZ-6tlD/612D) 

¥300.000 

X68(CZ-611C + CZ-600D/60ID) 

¥235,000 

X68(CZ-6 1 IC + CZ-6 1 1 D/61 2D) 

¥245,000 

X68(CZ-603C + CZ-602D) 

¥255.000 

X68(CZ-603C + CZ-605D) 

¥270,000 

X68 (CZ-603C + CZ-6 1 3D) 

¥280.000 

X68(CZ-603C + CZ-603D) 

¥215.000 

X68(CZ-603C + CZ-604D) 

¥225.000 

X68(CZ-602C + CZ-600D/60tD) 

¥240.000 

X68(CZ-602C + CZ-611D/612D) 

¥250.000 

X68CCZ-601C + CZ-600D/601D) 

¥195,000 

X68CCZ-600C + C2-600D 601D) 

¥190,000 




if) 

o o c 

CO CO **!*" 

o 

EXPERT H 
CZ-603C 
CZ-605D 

m 

O O >< 

° ° g 

Oi CO [— J 

ひひ さ 

n o ェ 


下取り 機種 

交換 差額 

交換 差額 

交換 差額 

交換 差額 

交換 差額 


CZ-652C 
CZ-602D 

¥308,000 

¥135,000 

¥238,000 

¥ 95,000 

¥135,000 


CZ-602C 
CZ-602D 

¥268,000 

¥ 95,000 

¥198,000 

¥ 55,000 

¥ 95,000 


CZ-61 IC 
CZ-61 1D 

¥270,000 

¥ 97,000 

¥200,000 

¥ 57,000 

¥ 97,000 


CZ-60IC 
CZ-601D 

¥318,000 

¥145,000 

¥248,000 

¥105,000 

¥145,000 


CZ-600C 
CZ-601D 

¥323,000 

¥150,000 

¥253,000 

¥110,000 

¥150,000 


CZ-880C 
CZ-880D 

¥440,000 

¥267,000 

¥370,000 

¥227,000 

¥267,000 


PC-9801VX21 
PC-KD854N 

¥313,000 

¥140,000 

¥243,000 

¥100,000 

¥140,000 


FM-TOWNS-2 
FMT-DP531 

¥393,000 

¥220,000 

¥323,000 

¥180,000 

¥220,000 


LAND 


J^/IUCHL TOMATO S e,„ s .KO#t 

下取り 

下取り 差額の 



omRon mBBBSSMmaxsW mmi sc 

XV i 

テレビ 朗 i 

で CM 放 

払い は、 ク レジ ッ卜を 御 利用 下 t 


取り 大観 迎// 


XIBBOOO 

PROE-PROEHD 



基本 セッ卜 

PRon 

圓 KWK"，，:， 

CZ-653C< 本体 > •••• 


3M バイトの 大 量 メモリ， 
拡 Sftl/O ポート 4 スロット 標 

« mm 


¥Sofmap*5fflE 

CZ-613D (ぼ' ドット ビブ チ o.3i> ¥Sofma 口 特価 

マクセル ブランク ディスケット <5"2HDX10tt い "¥30す!713[3 特価 


標準価格 Y444,l 


¥ 1,900X7 2 回 

j" ポ一 ナス 

V24, 000X12 回 

•>:(，: ，通 

| ポー ナス 

Y30,OOOX8 回 


1 ポー ナス 

¥60,000X4 回 


K 

な し 


| ポ一 ナス 

な し 


基本 セッ卜 

PROH-HD ィ, き 

■ mmmmd22 ^ 

CZ-663C (本体〉 お of map?? 

CZ-613D (は'' ドット ピッチ 0.3 け ¥Sofmap^ 

マクセル プランク ディ スケ ッド 5"2hdxio お —'^Sofmat^ 


通信 セッ卜 

proe 

■ 1 1 piiii ii ― 

CZ-653C (本体〉 

CZ-605D<15' 卞ツ トビ ツチ 0.33> 

MD-24FS5(iiffi 用 モデム 240(IBPS> 

CZ-257CSCCOMMUNICATION PR06BKI 
マクセル プランク ディスケット <5 2HDX1[I«[> 


棵準 価格 Y486,l 


ririiTvCTTiTa^B ポ一ナ 


¥16,500X24 回 


プリン 卜セッ 卜 
PROH-HD 

CZ-E 


.663 ひ 本体 > 

CZ-605D<I5 マツ トビ ツチ!) .39> 

CZ-8PGKM ビン U 宇 トリ ト カン タ -8W> 


)NYFUJI FILM Z^araveiie.lB WIITKH 


3 本 テレビ、 TBS 、フジ テレ匕 
ョ、 テレビ 東京 系列 
映中ガ 直営 10 店 H 


o 


MIDI セッ卜 

prok 

CZ-653C (本体） * 



CZ-605D<15" ト' ッ トビ ツチ 0. 
CZ-6 日 M1WU0I ポート 
CZ-252MS<Music Studio PR068K Ver.l.l) ¥Sofm3P^ffl6 

マクセル ブランク ディスケット u—2hdxio 枚 >"'¥Sofma 口 ^ilii 


m 

¥Sofmap^ff 
¥Sofmap 特価 
¥Sofmap 特価 


に 
も 
多 
数 

D 
扱 

し、 
し 

お 

ま 
す 

の 


_ ¥S« ほに 

ス ¥28,0J10X】2 回 

ス — 


¥ 2,500X84 回 


下取り 差額 は J 

随時 変動し ます。 ！ i 


開発 セッ卜 

PROH-HD 
■ ^^一 

CZ-663C (本体 > ¥soTmap^(flfi 

cz-605D<i5' ドット ビ ツチ o.39> ¥Sofmap^«fi 

cz-2I9ss<os-9> ¥Sofmap^ 価 

CZ-2IILS<C Compiler) ¥Sofmap 特価 

マクセル ブランク ディスケット s'wDxid^-YSofma 口 特価 



標準価格 Y547,l 


鋒' ふ l^ilB 國 

ポ— ナス ¥35, 000X10 回 
ポ一 ナス ¥50,000X6 回 


ポー ナス な し 


ポー ナス な し 

¥ 12.700X36 回 

ポー ナス な し 


摞$ 価格 Y47Si 


ほば 



標準価格 boo ¥^teicr 


¥ 2,300X60 回 f !S>JLmililtKllilig 豳 


12,700X48 回 

ポー ナス 

な し 

18,200X36 回 

ポ一 ナス 

な し 


標準価格 Y596, 600 ¥ ぉ電 ほに て 



ポー ナス ¥28,000X14 回 

¥ 8>20OX72 回 

ポー ナス な し 

¥ 9,200X36 回 

ポー ナス ¥30,000X 6 回 


K 

¥20,500X24 回 




CZ-22 1 HS<NEW Print SHOP P 細 10 
マクセル ブランク ディスケット «"2HDX10(J> 


さジ ガ 

菜レ K 

S さ 0 


ス ス | ス j スース 

ナ ナ 一 ナーナ ーナ 

I 二 1 三 I 

ポ ポ I ポ |ホ1 ポ 


注文 害 

お ぉリ 

買 取 依頼 書 

'ノっ 卜 名 

機ネま 

乂；' ィァ 


ノノ r 


z ノ— 1 ノ 






佺 所 
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TE し 

















金して 下さい。 

定価 5.000 円 未； #S の 商品に ついては プラス 300 円 3 


PC98 シリーズ 



定删 


H 国 志 11 


12. 

ポビュ ラス 

9.800 

8 

プロ ミスト ランド 

4.800 

4, 

ダン ジョン マスター 

9.800 

8. 

シ ムシ ティー (9 月 7 日 発 5C) 

9.800 

8. 

大 航海 時代 

9.800 

8. 

キャンペーン 版大 *i 略 11 

9.800 

8, 

栄冠 は 君に 

9.500 

8 

FOXY 

6. 800 

5 

ドラゴン ナイ 卜 

6.800 

5. 

D- 欧州 接 

12.800 

10 

パズル トビ ァ 

7.800 

6. 

エイト レイクス ゴルフクラブ 

4.800 


雀皇 登竜門 

9.800 

8. 

ドラゴン ス レイヤ一 VI 

8,700 


バトル 

46« 年 物語 

12.800 
9.800 

8. 

» 甲 師団 

9.500 

8. 

天と地と 

12.800 



中古 ソフ 卜大 処分 


PC98 シ リース 


人-阪^,:'.'; 槻 山',:'.' ；槻町 12—13 
I リ j 不 II ビ ノレ 2F 


く 東京 地区 TEL オープン〉 

S0726-83-9907 003-713-1424 


明 和 ビル 

一 -2F 


住友 BANK 


新作 エメラルド 伝説 ¥B，B00 


送料 • 消费税 
要りません./ 


新作 DE*JA¥5，700 酽消 *税 


^ りません/ 


き 代金 は; 主文 書 を 添えて、 現金書留で 送って 下さい （小為替 不可） 
後払い システム もあります 
» 新品 ソフト を ご; 主文の 場合 は、 商品 代金 を 送って 下さい， （送料、 消 ¥6 稅 込み） 
» 中古 ソフト を ご; 主文の 場合 は、 必ず 電 K にて 在庫 確認 をして 下さい 
» 未 発売 ソフトの 場合 は、 予約 扱いと させて いただきます 


• 買 取り 希望の 場合 (t まず ソフト を 当店に 送って 下さい こちらで 高 額 査定のう え、 TEL で 
ご連絡 させて いただきます 値段が 合わない 場合、 商品 はすぐ 返送し ますので， 安心して 
お送り 下さい 

» ディスケットの 送料 は， 100 枚まで 500 円です 「， 

» 中古 ソフト リスト 完成、 ご 希望の 方 は 62 円 切手 3 枚 をお 送り 下さい 


トンネル ズ& トロ一 ルズ 9 

ダン ジョン マスター 9 

ポビュ ラス 9 
ワン ダラ一 ズ フロム ィ一ス 8 

ナイト アーム ス 9 

バブル ポ ブル 7 
ダウンタウン 熱血 物語 8 

スーパ一/、 ン グ才ン 8 

三国志 II 14 

閣の 血族 (上 卷） 8 

ワールド コート 8 

ルー ン ワース 8 
シ ムシ ティー (9 月 7 曰 発売） 9 

ク オース 6 

ガン シップ 1 1 


ィース I 

その他 多数 在 JS あり 


800 

800 8 


12 
8 


アフター パーナ 一 g 

ィ一ス 3 8 

維新の 嵐 g 

信 長 戦国 群雄 伝 9 

ガウディー 9 

グ 分 ダ 8 

エー ジャック ス 8 

ジェノサイド 8 

ナイト アーム ス g 

サ ラマン ダ一 8 

ス —バー ハング オン 8 

天下 統一 9 

ダン ジョン マスタ一 9 

ポビュ ラス 9 

デス ブリンガー 9 

大海 令 12 

ラスト ハルマゲドン 9 

森 田 将棋 2 10 

メタ J レサ イト 8 

V'BA しし 7 

源平 鬪 K 伝 7 


ケの他 も 数在沛 あり 


ブランド 品 57HD 
ノーブランド 5'2HD 
ノーブランド 5'2D 

ブランド fa 3.57HO 
ノーブランド 352HD 

消 » 税 3% 及び 送料 
500 円 を プラスして 送 
金して 下さい。 


RYU 

1.600 

9. 

C3 ン メル 

8.800 


^略 空軍 

8.800 


エメラルド ドラゴン 

9.800 

8. 

スト □ ベリ一 大戦 略 

6,800 


デ 'ジ ャ 

6.800 


RB 炎 迷宮 

8.800 


DUE し 

8.700 


インペリアル フォース 

8.800 

7, 

大戰略 ill 「赤の 逆 51 編」 

3.600 


プリンス ォブ ペルシャ 

8.800 


キャンペーン 版大戰 « 11 マップ 

4.800 

4, 

麻雀 t き 空 - 天竺への 道 

9.800 

8. 

クォーター スタッフ 

9.800 

8. 

サイレント メビウス 

4.800 

12. 

3-5— 版 も 在庫あります- 




PC88 シリーズ 


品 名 定価 (円） 

^売 衡恪 

DUEL 

8.700 

7,300 

三国志 II 

I4.8G0 

12.500 

FOXY 

6.800 

5.700 


X68000 シリーズ 


商 品 名 定価 (円） mm 

三国志 II 14.800 

ポビュ ラス. 9.800 

ダン ジョン マスタ一 9.800 

ブライ 上卷 9.800 

キャンペーン 版 大戦 略 2 9.800 
トンネル ズ&ト ロールズ 9.800 

FOXY 6.800 

ドラゴン ナイト 6.800 
セーラー服 戰士 フェリス 6.800 

うろつき 直 子 6.800 

ダーク レイス 9.600 
エイ 卜 レイクス ゴルフクラブ 4 . 800 

レ ナム 9.800 

S 皇 登竜門 9.800 

ドラゴン ス レイヤ一 VI 8.700 

維新の » 9.800 

提督の 決断 14,800 

水 IR 伝 9.800 

バトル 12.800 
ワンダラー ズ フロム ィ一ス 8.700 


46 像 年 物語 

9 

800 

懊甲 師団 

9 

l J)\) 

ぉに-;： ル' 

8 

800 

ロンメル 

8 

； ■■：(".) 

天と地と 

12 

yijo 

RYU 

ロー ドス 島 戦雲 己 

11 
9 

i)U0 
JiUU 

ブル トン レイ 

a 

800 

エメラルド ドラゴン 

9 


デジ ャ 

6 


斬 アナログ 

9 

Kill) 

アーク ス 2 

9 



3.5' 版 も 在庫あります. 


PC88 シリ 

-ズ 



定価 (円） 

mm 

ドラゴン ナイト 


< 

だ 

foxy 

DUEL 


ドラゴン スレイヤー VI 

8.700 

さ 

信 長 *1 国 群雄 伝 

9.800 


水滸伝 

9.800 


三国志 11 

14.800 



X68000 シリーズ 


ドラゴン ナイト 6 

800 

5, 

雀 ポー グ すずめ 7 


6, 

大 航海 時代 9 


8. 

天使た ちの 午後 番外 3 8 

800 

7. 

セーラー服 戦士 フェリス 6 

800 

5. 

エメラルド ドラゴン 8 

800 


クリムゾン m 8 

700 


夢幻の 心 9 

700 

8. 

W 鬥 卷秘帖 6 

800 


きゃんき やん バニ ース ペリ オール 6 

800 

5, 

J ップ スティック ADV 11 6 

800 
400 

5. 

DPS 5 
トンネル ズ&ト a— ルズ 9 

800 

4. 
8. 

うろつき 童子 6 

800 


ラン ペルー ル 9 

800 

8. 

ラン ペル一 ル CD 付 は 

200 


その他 多数 在應 あり 




商 品 名 定価 (円） mm 

グラナダ 8.800 7.400 

天下 II 一 9.800 8.300 


銀; 可 英拢伝 说 8.800 

大 航海 時代 9.800 

サバッ シュ 7,800 
トンネル ズ&ト ロールズ 9.800 

雀 ポー グ すずめ 7.800 

ソ ーサリ アン 9.800 

ィ一ス t 7.800 

ィース 2 7.800 

ィ一 ス; 3 8,700 

夢幻の 心 Kill 9.700 
きゃんき ク A^/t ニースべ リオ ール 6.800 

スト 口 ベリ一 大 ^ 略 6.800 

DPS 5.400 

維新の 嵐 9.800 

アーク ス 2 9.800 

ラスト'、 ルマゲ ドン 7.800 

その他 多数 在庫 あり 

商 品 名 定価 (円） mm 

ァ一 スス 2 9.800 

ァ一 ルタ イブ 7.800 


^め^ ^孤 冗 


a にて お問い合わせ ください。 

nwon5cuc:sc5c3 ひひ-: 3 ひひ G3n> ひひ c3 ひひ c3d3 

278888887888888880898 


円 円 円 円 円 


枚 枚 枚 枚 枚 

o o o o o 


は； -リ nu o D o n- o o o n- G o n n- o o o M. -Mf 

ffls333i-d3w77 SO & ふ ni!JJ&s ひ OS 


OQguooon-oo^>oocuoo 


はに てお 問い合わせ ください。 


© にて お問い合わせ 


- / 6 3 4 7 4 3 2- /■ 7753733 


0 にて お問い合わせく ださい。 


アフター サ 


パソコン 新3 


きお 近 〈の 方 は、 お 立 寄り 下さい。 
専門 係員が アドバイスいた します。 
* ビジネス ソフト、 ゲーム ソフトの こと 

ならお まかせ 下さい!！ 
セール 期間 

^ '90 8 - 15 — 9-15 


ビス 万全 
の サポート 体制 
優良 パソコン 販売店 


"り、 き:!^ ンぉ 電話，。 ， 


もってけ、 もってけ〃 ドカ 〜ンと プレゼント 

◦A ランド 恒例 '大 ぉ買徳 セール 実施 中 



> 毎週 曰曜、 第 2 ，第 4 土曜日 は、 定休日と 
させて いただきます。 


SHARP XBBDOO シリーズ セッ卜 


周辺機器 コーナ- 


* 次代の イン;^! 

X68000 EXPERT II 

• CZ-603C-BK/GY 

• CZ-605D-BK/GY 

• MD-2HD 20 枚 


定価 合計 ¥453,000 

OA ランド 大 特価 



SX- WINDOW 搭 

X68000 EXPERTII-HD 

• CZ-6I3C-BK/GY 
CZ-605D-BK/G 丫 
MD- 2HD 20 枚 


価 合計 ¥ 563,000 

OA ランド 大 特価 


外 


12 回 

¥30,000 

24 回 

¥15,700 

36 回 

¥10,900 

ク レジ 

'スト 

12 回 

¥37,300 


¥19.600 

36 回 

¥13,500 


X68000PROII 

• CZ-653C-BK/GY 

• CZ-605D-BK/GY 

• MD-2HD 20 枚 ― 
定価 合計 ¥400,000 

OA ランド 大 特価 


»SX-WINDOW 塔 載〃 



ット 


12 回 

¥26,500 

2 個 

¥13,900 

3 睏 

¥9,600 



X68000PROII-HD 

• CZ-663C-BK/GY 

• CZ-605D-BK/GY 

• MD-2HD 20 枚 

定価 合計 ¥510, 000 

OA ランド 大 特価 


'スト 


12 回 ¥33,700 24 回 ¥17,700 36 回 ¥12,200 


X68000SUPER-HD 

• SX-W1NDOW 搭載 

• SCSI インタ一 フェース 装 

• 80MB ハードディスク 搭載 

• 3MB 大 容量 メモリ 装備 
* 高 解像度 グラフィック 


t.S 腳 DO 震〃 X680005UPER-HD 

ICZ-623G-TN (チタン） 
IGZ-6I3D-TN (チタン） 

枚 

！ "価 合計 ¥ 633,000 



ク レジ 


1 回 

¥490,630 

12 回 

¥41,900 

24 回 

¥22,000 


OA ランド 大 特価 


セットで 購入の お客様に、 ディスケット （10 枚）、 ゲーム パック サービス 中. グ 
さらに、 期間 中 ゲーム ソフト 力、' 1 本 付きます。 詳しく は、 お 霜 話 下さい。 


新製品 コーナー 


ISX-WINDOW 

(次代 インテリジェント ソフト） 


定価 ¥6.800 

□A ランド 特価.〃 



ICZ-6BV-1 

(ビデオ • ボード) 


定価 ¥21,000 

OA ランド 特価〃 



今月の 特価品 (限定) お 早目に〃 


★ CZ-888C(BK) シャープ 

匕 1 台 限定 |- 大 特価 ¥80,000 


★ CZ-603C(BK) シャープ 

5f? n 3 台 Mil • • • 大 特価 ¥236，000 


• OZ-6S3C (BK> シャープ 

« 示 A3 点 MX 

き WOA300 (ワープロ） シ ヤー 
走《 V I 65. OO0 

• (ワープ O) シ ヤー 


需*。ぉ1_30(ヮープロ）シ1 
*ht ¥ 198,000 

>PW-9iO( ヮ一ブ a) シ •— つ 


Kffl6V1 99,000 
■- 特価 V1 10,000 
**(»¥125,000 
W«V134,000 
価 ¥85,000 


• PC-KDB53C T-ra^CRT)NEC 
»XC-lfl98C(7*-*-05''OBTJStt 

き CU-I4FD (アナ O グ GRT> シ ヤー フ 

• PA-85。 。（電子 mo シャープ 

• PA- "750 。（電子 竽 »■) シャープ 


4«{iBV50,OOO 
4«fifiV54,aOO 
■«ta5V46,000 
■«fflfi¥14300 
価 ¥16,000 


プリン 夕一 セッ卜 コーナー 

き CZ-6PV I (カラー ビデ オフ リ ンタ一 ） 
定価 v 138, ooo ► 特価 ¥152,000 

き CZ-8PC3(24 ドット 財 K 写 カラ一 フリン タ一） 

定価 ¥ 65,800 ► 特価 ¥ 53,000 

• CZ-8PK 1 0 (24 ヒ ン澳 字ト' ツ トフ リ ン ター • 1 36 桁） 

定価 V 97,800 ► 特価./ TEL 下さい！ 

き CZ-8PGI(24 ヒン カラー ii 字 ドット フ リン タ一 '80 桁） 

定価 ¥130,000 ► 特価/ TEL 下さい！ 

き CZ-8PG2(24 ヒン カラー; ま 字 トツ トフ リン タ一 '136 桁） 

定価 ¥ 150,000 ► 特価/ TE し 下さい！ 

*lt>735XI カラー イメージ 1ッ トフ リン ター） 

定価 ¥248,000 >特«/丁にし 下さい！ 


OA ランド 特選品// 
丄』 辭 

■ CZ-8PC4( 定価 ¥99,800) 

1 ほ ラ— 特価 


XB8D00 用 ソフト ゥ: c ァ一 • コーナー If X680 叩 用 S 辺 機器 コ^^ 


：[ CZ-2IZBS (BUSINESS) --… 
I CZ- 扁 S(DATA) 

3 CZ-2l5MS(Samplng) 

4 CZ-22IHSCNEW PmlSwp)-- 
; I 0^22785は0卩財筏会計)-- 
I CZ-226BS(CARD) 

7 CZ-223CS (Communicaton) … 

8 CZ-2I3MS(MUSIC) 

.? CZ-2MLS(C conpter) 

^C-TRACE (キャスト) 

'U EW (イースト） 


特価 ¥ 53,000 
〕。► 特価 ¥ 45,000 
跨特 ffl¥ 13,800 
肺讓 15,500 
〕o> 特価 ¥158,000 
〕()► 特価 ¥ 23.000 
黪 特価 ¥115,500 
)o> 特価 ¥ 14,800 
) 睁 特価 ¥ 31,000 
)()► 特価 ¥ 52,000 
)[)► 特価 ¥ 29,000 


定価 ¥ 38.000> 特価 ¥ 30,000 
定価 ¥ 26,800ト 特価 Y 21,000 
定価 ¥ 88.000>特価¥ 69,800 
定価 ¥ 69.800>TE: し 下さ レ、 
定価 ¥188. 000>特 価 ¥149,000 
定価 ¥ 79.800ト 特価 ¥ 63,000 


I 最新 ゲーム ソフト 
その他 各種 ソフト 

20%〜25%OFF ガ 
► 周辺機器 'プリンター 
割引 販売 中ズ/ TEL 下さい/ 


園い O DATA ± 曽言殳 RAM ボード 

, 1MB 增設 RAM ボード * 2MB 増設 RAM ボード * 4MB 増設 RAM ポ一ド 

PIO-6BEI-A PIO-6BE2-2M PIO-6BE4-4M 





特価 ¥19,500 特価 ¥38，500 特価 ¥67,000 


け、一 ド ディスク 固 特価品 もあります ので TEL 下さい。 


* アイ テック rrx-f 

暴 アイ テック ITX-i 
鲁 a ジ テック し HD 
* ロジ テック LHD' 
♦ □ ジ テック し HD. 


特価 ¥117,000 ♦ シャープ 特価 ¥118,000 

特価 ¥149,000 • シャープ Gz siH 特価 ¥ 95,000 

"特価 ¥ 85,000 ♦ アイテム hxd-mo 特価 ¥ 88,000 

'- 特価 ¥ 90,000 • アイテム hxd-042 特価 ¥ 95,000 

特価 ¥1 04,000 • icm sr-8o 特価 ¥1 30,000 


中古 パソコン 


(価格/在庫 は 変動し ます。 予約 は 5 日 以内と します。） 


C-980IRA5 ■ 
D-980IRA2 '- 
D-980IRX2 ••■ 
3-980IEX2 ■■■ 
0-980 IVX2I ■■ 
O-980IUX2I • 
C-980IVX2 -- 
G-980I VM2I- 
O 980IUVI I - 
D-9801LV22- 
D-286VE …… 
C-286US …- 


¥338,000 より PC 


286VS 

CZ-600C … 


¥199,000 ょリ 
V190.000W 
¥170,OOOW 
¥165,OOOW 
■¥160,OOOw 
¥150,000 ょリ 
¥148,000 ょリ 
¥160,000 ょリ 
¥150,OOOw 
¥155,000 ょリ 


68000 甲 モニター …… 
PC-980lffl サウンド ポ- 


400 ライン CRT- 
200 ライン CRT - 


¥165,000 ょリ 
¥160,000 ょリ 
¥170,000 ょリ 
¥198,000^ 
¥178,000 ょリ 
¥210,000 ょリ 
¥ 49,000 ょリ 
¥ 13,000 ょリ 
¥ 50,000 ょリ 
¥ 65,0001 リ 
¥ 38'00Oi リ 
¥ 10,000 ょリ 


通信販売の ご 案内 

- 全国 通販 


[_ 井の? (MS^&W 


LTr 


<]109 


■ Ugn 店 


躍 銀行 振 込で 申し込みの 方 は 商品名 

及び お客様の 住所 • 氏名 '電話番号 

をお 知らせ 下さい。 
〔振 込 先〕 第一 觔業 銀行 渋 谷 支店 

普通 NoJ 1 63457 ㈱オーエー ランド 

黼 現金書留で 送金され る お客様 は 電話番号と 商品名、 数量 を 明記して 同^して 下さ 
い 園 クレジットで ご 購入 を 希望され る 方 は 申し込み 用紙 をお 送り 致します ので こ 1£ 
入の 上 返送して 下さい。 20 才 以上の 方 は、 原則として 保証人 不要です リ クレジット は 
1〜60 回 払で S 々5.000 円より ご 自由に 設定で きます。 


* 下 取. 買 取 は 電話で 見積りして おります。 實任を 持って 下取り させて 頂きます。 
參 ご注文、 お 問合せ は… 午前 10 時から 午後 7 時まで 
き 商品のお 届け は… 入金 確認 後、 即日 発送 致します。 

■ ォ一 • ランド 

〒150 東京都 渋 谷 区 円 山 町 20- 4 第 5 日 新 ビル IF 

S(03) 770- 8855 FAX ( Q3 ) 770 7080 

関東 エリアの 送料 は、 ，個に つき ¥1,000 です。 

★ 全 商品 ィ呆 IE 害 付。 專鬥の アド, くィ ザ一 か'、 お客様の 二一 ズに 対応し ます 。 

★ 初期 不良 '輪 送 トラブル 等に 迅速に 対応し、 sn 交換 させて いただきます 0 


I 表示 価格 は、 税別 表示です。 詳しく は、 お 電話に て、 お問い 合せ 下さい。 掲載の 価格 は、 7 月 中 現在です。 


年中無休 


'1 



新規 ユーザー 'EXE 会員 


★ X6800Q ユーザー ニーズに 対応した 八ード • ソフ卜 ウェア • 周 辺 
機器 は 全て 展示して います。 

★ 新製品 情報 • ユーザー 同士の 情報 交換が できる、 メンバ一 様の 

憩いの スペースです。 
女大 特価 セール 期間 中 'ディスプレイ • プリンター 御 購入 

の 方 は 全国 どこでも 送料 無料〃 
女遠< で なかなか お越し 頂けない 方に も通販 専用 TE L で 専門 ス 

タツ フ （X68 PRO STAFF) が 親切 丁寧に お答えし ます。 

★ X68000 お買い上げの 方、 アイツ一 より Big プレゼント 


ォり ジナル ステッカー ， 

XB8000 フロッピー タイ 卜ル シール (_ お好き もの 2 点 
X 68000 オリジナル テレフォン カー 卜 f もれな)： ついて くる〃 

★ 現在 シャープ X68000 EXE 会員の 方、 お 卜 モダチ を ご 紹介 下 
さい。 ご 購入 成立 時点で アイ • り 一と シャープより ス テキな プ 
レ セン 卜 進呈 中.〃 

★ アイ • ツー メンバーズ 優待 制度 実施 

アイ • ツーで XSWJOO'iS ひ ソフ卜 ウェア 周辺機器 をお 買 上げ IS きました ユーザ. 一様 
に はォ 1 U シナル メンバ' 「ズ カード を 3 付 JX' します。 メン 八一 スの 方に は 楽しい 八ソ 
コン ライフ をお くれます ように 最 S の フォロー を アイ 'ツーより ffl 供し ます。 


5 


新 製 ロロ 入替機 


展示品 処分 祭 早い 者 勝ち 
e^S^CZ-BiaCBK 
SET/cz-B03DBK 
定価 +3%= ¥567,324 


あなたの 

お 支 キム は 
タッタの 




画 営業時間 AMn:00~PM8:00 


06-633-9800 


通販 専用 TEL. 


X680 囬プロ ショップ (専門店) 
ならではの 企画です〃 


次 n 

X6B000 ユーザ一 みんな 集まれ/ 
SX-WINDOW あ 勉強 会 7% 

開催し ま一 す o 

参加 ご 希望の 方 は、 K 円 切手 同封のう え、 お 名前 • ご 住 
所 'TEL' 生年月日' お持ちの X68000 の 型番 を 書いて、 
アイ' ツー EXE CLUB あてで 、おくって 下さい。 
日時、 場所 etc... ご連絡 し ます〃 

場所 はとり あえず 大阪 です/ 


アイ' ツー in シャープ グランド フェア '90 OSAKA スタジアム 
に 多 效のご 来場 頂きまして、 K にあり がと ラ こさいました。 
アイ _ッ 一サン クス フェア Par はも 只今 企画 中て すの て、 迄う 
こ 期待〃 


X68000 ユーザー とっておきの グッズ〃 
X68000 ユーザーの ステータスシンボル。 
, 新 グッズ も グルー ブインして ますます 充実。 
t キミの パソコン ライフが 一 雇 楽しくなる コレクション だ/ 
X68D00 オリジナル グッズ を まだ 持って いない キミ 
アイ' ツー からお 届けし ちゃい マス / 

さや - レ 



^や^ ^ 


information & interlace 

m ヌゼゅ 

大阪店 〒5 犯 大阪市 中央 区 難 波 千 曰 前 15-1 B 


ss 4£ 


SS6QOOO 

SSBBOOO 

SSBBOOO 

にハ 

圃 'I' |—. .. 






ク 
リ 

ェ 

特 
典 


• 全 商品 完全 保 BE 害 付 （メーカ一 呆証） 

像 全国 無料 配 速 (一部 離島の 方 は 有料になります） 
會配速 日の 指定 OK (日曜 • 祭日に 力、 かわらず お客様の ご 都合 

にあわせて 配 速し ます） 
• どんな 商品の 組合せ も 自由自在 （ご 予算、 用途に 応じ 自由 

自在に システム アップで きます） 
• 中古 ノく ソコン 高額 下取り （今お 使いの パソコン をわず かな 

差額で グし ドア ッブ） 
參 お支払い 方法 自由 (低金利の 均等 払い、 ボーナス一 括 払い 

も ご 利用く ださい） 


営業 時閫 (定休日 ► 渋 谷 店: 日曜' 祭日/横 浜 店: 水曜） 
AM10:00〜PM7:00 


当社 は X68000 の 販売 認定 店です > 

どんな ことで も 安心して ご 相談く ださい。 


X68000 

ビッグ' サマー セール 開催中/ 


XXB8000newproe US8000n„ U68000 experts 


» CZ-653C (本体) ¥ 285,000 

• CZ-603D (カラ- テ V スプ レイ) ¥ 84,800 

まお 好きな ゲーム ソフト 1 本 ¥ 7,800 


画定 価 合計- 


- ¥377,600 


クリエ イト 特価 


均等 払い |¥ 7,680x48 回 

V 9,890 ■ お 回 

¥14.370x24 回 

ポー ナス | な し 

な し 

な し 


• CZ-603C (本体) ¥ 338.000 

參 CZ— 61 3D (カラ一 テ V スプ レイ テレビ) ¥ 1 35,000 

• CZ-8NJ2 ¥ 23,800 

攀 お好きな ゲーム ソフト 1 本 ¥ 9,800 


陽 定価 合計 …… 

クリエ イト 特価 


¥506.600 


リ, い 

¥ 9.970^48® 

¥12.840x36 回 

¥18,660xw 回 

ポー ナス 

な し 

な し 

な し 


>CZ— 613C (本体) ¥448,000 

► CZ—604D (カラー ディスプレイ) ¥ 94,800 

► お好きな ゲーム ソフト ，本 ¥ 9,800 


國 定価 合計- 


- ¥552,600 


クリエ イト 特価 


均等 払い 

¥ 5.920x48 回 

¥ 7.400 "6 回 

¥12,100x240 

ポー ナス 

¥30,000 x 8 回 

¥ 40,000 x s 回 

¥ 50,000 x m 


SXS8000 supe 園 


•CZ-623C-TN (本体 'キーポート 、マウス） ¥498,000 

*CZ-613D-TN (カラー ディスプレイ） ¥135,000 

•CZ-6BP1 ¥ 79,800 

画定 価 合計 ¥712.800 

クリエ イト 特価 


均等 払い 

Y 7,320 ' ：■■■■■! 

¥10,100x36 回 

¥ は 450x24 回 

ボーナス 

V 42.000- -.: に 

¥ 50.000 x 6 回 

¥80,000 x 4 回 


※本 広告に 掲載の 全 商品の 価格に ついて 消費税 
は 含まれて おりません。 


(DC^UlJlJ new EXPERTS 

ミュージシャン セット 。これ も TM ネットワーク だよ 〜/ 

• CZ- 603C ¥338,000 

• CZ- 605D ¥115,000 

• MLM.B(MIDI ボード & ソフト） ¥ 39.800 

参 CM32L ¥ 69.000 

参 グラナダ ¥ 8,800 

• JOY カード ¥ J .800 

画定 価 合計 ¥ 572,400 ► 超 特価 ¥458,000 


XYSSOOOnewpfwb 

ゲーマー ズ セット。 遊んで '暮らせる SET/ 
き PRO II CZ653C ¥285.000 

• 0.31 CRT CZ603D ¥ 84,800 

譬 グラナダ ¥ 8.800 

• VS ¥ 8.700 

参 ポビュ ラス ¥ 9,800 

参 スーパ— ハング オン ¥ 8,800 

鲁ェ一 ジャック ス ¥ 8,800 

譬サ 一ク ¥ 8.800 

拿 アール タイプ- ¥ 7,800 

参 アナログ JOYS"HCXE— 1AP ¥ 13,800 

■ 定価 合計 ¥445.100> 超 特価 ¥353,000 


★ この 表 以外の 組合せ、 お 支 
払い 方法 も ご 自由にで きます。 
★XI シリーズ 用、 X68000 シリ 
ーズ用 各社 ハードディスク/ プ 
リン タ 等の 周辺機器 を大 特価 
にて 販売して おります。 
電話に てお 問合せく ださい。 


^谷 店 



s 田 ほ kq{ も l^tAMlti o» » ！ tit an 


X68000 シ リース 

Hi 

辺 機器 'ソフト オール 超 特価〃 

型 番 

ni: ti 

\ 定 1i5 ！ 

ソフト 名 

on 'fj 

\ 定 ぬ / 

CZ-6VT1 

カフ 一- 1 メーシ _L ニット 

\¥ 69,800/ 

MUSIC PRO 


\Y 28.8110/ 

CZ-8NS1 

カラ 一イメージ スキャナ 

V188W 

MUSIC PRO-68K 

マウス を 使った 楽 18 ワープロ 

W 18.B00 

CZ-6BEIA 

IMB»« 設 RAM ポー ド 

¥ 38.000 

SOUND PRO-68K 

サウンド ェテ' イタ 

¥ 15,800 

CZ- 

2MB 増 KRAM ポー ド 

Y\ 79.8f)D 

Sampling PRO-68K 

AD PCM サン ブリン グェテ V タ 

や 7.— 

C2-6BE4 

4MB 增投 RAM ポー ド 

Y ^8.^03 

Musicstudio PRO-68K V.I.I 

MIDI マルチ レコーディング ソフト 

¥\28.600 

CZ-8NM3 

マウス • トラック ボール 

¥ \9yBO0 

OS-9 X68000 

マルチ タスク オペレーティングシステム 


BF-68PRO 

H 性能 CRT フィルター 

¥ \%m 

PRO-68K 

サイバー ノート 

¥ 1》 攝 

CZ-6BPI 

数餹 演算 プロセッサ' ボード 

¥ raiaoo 

PRO-68K 

ステ一 ショ ナリ一 

Y /— 

C2-8NT1 

トラック ポール 

¥ A3ji00 

Ccompiler PRO-68K 

ソフト 閱発 セット 

V /3ゅ00 

CZ-6BMI 

MIDI ポー ド 

¥/26.8b0 

Human 68K Ver2.0 

閱発 ツール セット 

¥ 9如 

C2-8NJ2 

アナログ スティック 

V' ？ 3.80\) 

PIO-6BE1-A 

内 SfelMRAM 

¥ 25,0 や 

CZ-6TU 

バソコ ン チューナ 

¥ 33. J Oft 

PIO-6BE2-2M 

2MRAM 

H 50.00 ぺ 

SX-68M 

MIDI I/F 

¥ I9,800\ 

PIO-6BE4- 4M 

4MRAM 

¥ 88.000\ 

XE-1AP 

尸 ナ ログ ジョイ バ 1 

/ Y 13.800 \ 

MU1-B 

MIDI t/F+ ソフト 

1 Y 39.800 、 


▲ 上記 以外 ビジネス ソフト、 最新 ゲーム ソフト 豊富に 在庫あります。※ 送料 は ご注文の 際お 問合せく ださい, 


> 超 特価 販売 中./ 



パソコン 専門 ショップ 


総合お 問合せ 先 S03-486-654 柳 



> 渋 谷 店 o03— 486-654K 代) 


渋 谷/横 浜 


テ150： 東京都 渋 谷 区 渋谷ト 12-7 ミ和渋 谷 ビル 
振 込 銀行: 三 井 銀行 渋 谷 宮益坂 5 店 fNo.5000340 


き 横 浜 店 o045-314-4777( 代) 


干221： 横 浜 市 神 奈川区 US 町 H2-8 第 1 建設 ビル 
振 込 銀行: 三 和 銀行 橫浜 駅前 支店 f No3l0852 



種取り 揃え 大特価 セール 




ビデオ ボード CZ-6BV1, 

¥2，,00£H 特価 


88* 

入 仰ノ 


に:^ 1S して、 コンビ ュ一タ 画像 を ビデオ 儷 号と して 取 
り 出せます。 55 用 モニターがなくても、 液晶 ピジョン や 大型 テ 
レビの ビデオ 入力 端子に つないで 、コンピュータの ケーム な 
どが 楽しめます。 


SHARP 

CZ-612C (本体 ） 

ブラス (ディスプレイ) 組合せ- 

CZ-603D 特価 ¥358.000 
CZ-602D 特価 ¥373.000 
CZ-61 1 D 特価 ¥383,000 
CZ-613D 特価 ¥399.000 


SK6B000 

CZ-602C (本体） 

- プラス (デ イス ブレイ) 組合せ' 

CZ-603D 特価 ¥287.000 
CZ-602D 特価 ¥302.000 
CZ-611D 特価 ¥3 に, 000 
CZ-613D 特価 ¥337.000 


CZ - 652C (本体） 

- ブラス (ディスプレイ) 組合せ- 

CZ-603D 特価 ¥255,000 
CZ-602D 特価 ¥268,000 
CZ-611D 特価 ¥280,000 
CZ-612D 特価 ¥295.000 


CZ-603C (本体） 

'プラス (ディスプレイ) 組合せ- 

CZ-603D 特価 ¥300,000 
CZ-602D 特価 ¥313,000 
CZ-611D 特価 ¥323.000 
CZ-613D 特価 ¥343,000 


CZ-653C (本体） 

- プラス (ディ スフ レイ) 組合せ' 

CZ-603D 特価 ¥287.000 
CZ-602D 特価 ¥298,000 
CZ-61 1 D 特価 ¥31 0,000 
CZ-612D 特価 ¥327,000 


CZ-623C (本体） 

ブラス (ディスプレイ) 組合せ- 

CZ-602D 特価 ¥473,000 
CZ-603D 特価 ¥458,000 
CZ-611 特価 ¥483,000 
CZ-21HD 特価 ¥513,000 


I アイ ヒット 推奨 ディスプレイ 


カラー ディ スフ-レイ 

0.31 チルト 付 
定価 ¥74, 800— 
特価 ¥43,900 


鲁シ ヤー ブ CZ-860D'BK 
カラー テ' イス ブレイ 
0.31 チルト 付 A/D 15/24 

定価 ¥92, 200 ゆ 

特価 ¥59,800 



• = »XC-l498CiI 

(14 型 アナ ロク） 
ドット ピッチ 0.28 
定価 ¥ 107,0004 
特価 ¥59,800 


>(0-1498011«応パソコン»«^0"9801シリーズ 
/PG-286 シ リーズ/ PC- 386 シ リーズ/ PC- 880 1 


r. ほ^ 可能） 


鲁 シャープ CZ-830D.BK 

(14 型） 
2 モード オート スキャン 方式 
(アナログ /デジタル） 
定価 ¥38,000'; 
特価 ¥54.800 在庫 限 1 



OZ-830D 対応 バソコ ン极 種： OZ880O/88IO,XI/ 
TURBO シリーズ， ケーブル は 本体 付属 5~ (ま 用。 
NEC PC-880I-980I シリーズ （XA'XL のみ 不可） 
MZ700/ ほ 00/2000/2200/2500 各 シリーズ （推奨 
品 シャープ 8D8K). 


參 シャープ GZ- 602D— BK 

(ほ翌 アナログ rv/3 モード 

オート スキャン） 
定価 ¥93, 800' や 
特価 ¥75, 000 



CZ-602D « 応 バソコ ン «« ： * X 1 シ リ 一 ズノ * 
XI turbo シリーズ/ JO yurboZ シリーズ/ 
シリーズ/ PC880I シリーズ/ PC— 3801 シリーズ/ 
PC-28& シリーズ 

(# は接統 ケーブル ANI50S が 必要です） 


• シャープ CZ- 603D— GY'BI 
(15 型 カラ一 ディスプレイ） 
ドット ピッチ 3.3 

定価 ¥ 84,800'-; 
特価 


CZ-603D 対応 パソコン 機 H :*X ぃン リーズ/ * 
X1 turbo シリーズ /XI yurboZ シリーズ/ X68000 
シリーズ/ PG880 1 シ リーズ / PG-980 I シリ一 ズ / 
I PG-286 シリーズ 
» ( » は 接お ケーブル AN 1 506 が 必要です） 


SHARP 

AXHB6N-H2 All in Note 

定価 ¥398，00(3^2|ji^ 



SHARP 

AX286L-F ラップ 卜ップ 

定価 ¥428,00(H 特価. ¥238,000 



NEC 

PC-9B01 门 NOTE 

定価 半 24B,00(H 特価 ¥198,000 



TOSHIBA 

J31 囬 SS DynaBook 

定価 ¥ 1 98.000 =t 特価 ¥ 1 49,000 



《シャ- 


-プ 周辺機器 (拡張、 ブリン ター 他) も 常時 取り扱って おります。: 
i 各種 特選 • 特価品 / 1 


八 ソコン ファクス MZ-1V01 
"ブリン タ. コビ —ファクス" 

1 台 3 役の スグレ モノ 
限定 セッ卜 販売/ 

暴 MZ25 セッ卜 (インターフェース ソフ卜 付） 

キ累 準 価格 合計 ¥342.800#¥12tKODD 
• MZ-1V01 (本体の み） 

ffi 準 価格 合計 ¥278.ooo«*¥ 98, ODD 


《在庫 限り》 

PC-E500PJ 

定洒 V 28 , BOO 蜂大 特価 
SHARP ポケ ：3 ン全概 種、 
Z80 ポ―ド 他、 太平洋 工業製品 全 機種 取扱 
き PC- ご 謂 入の 方に、 ちれな < 
「ポ《 ン ジャーナル 特別号 j を 進呈/ 


PC-500 と 各 S パ 1 カン をつな ぐ インタ- フ I- スケ- プル 

CE-140T ¥8.800 


八 ガキも OK、New MZ ブリン 夕 

漢字 カラ一 熱 転写 プリンタ 

シャープ MZ-1P22 



<2a トマト, « 字 & カラ一 * 
i 獎字 30 キ'/ W> 高！ »印 ネ攀 MZIf 
I 7 とフ J レコン /、 チ攀 5KB の,、— ッ/、 

メモ'" わ 纖巧 パソコン： Mzzooo. iSSifciffl ¥ 59 . 800 

2500. S500. 6500 シ リース'. XI 
—ズ. X68000 シリーズ 他 


► 特価 ¥25,000 


キャノン LASER SHOT プリンター 
LBP-B40BS 

定価 ¥498.000 リ 特価/ 

キャノン LASER SHOT ブリン ター 
LBP-A4D4S ^* 

定価 ¥265.000 ：特 価/ 


シャープ MZ-1X30 モデム ホン 

上位 機種） く 在庫 限り》 


く 300ハ 2O0BPS 全 2 靈 iA (8 応 

モデム 内 « 攀 *， 入出力 an 子 

f 寸 •：？- ィャ J レノり レス Z プッシュ ポ 

タン wet'* プッシュ ポタン 齑 w« 

«，E 攀シャ —ブキ W,CCITT.V25 
bisiftffl 手 M サポート > 

標準価格 ¥98. 000 ■ 


リ〜 

yf^/ "お 

襲 

¥29,800 


TOWNS お買い 得 セット 


B 1- TOWNS- 1 

* ^KI 丄， B. FMT-ME(IM) w^- W 80. 

Wfti' 3. FMD-FD301 ま。 二..' v SB. 

隱 【】 d.FMT-KBIOl V EO, 

^^^^^ m I 5, FMT-DP53I い V BE). 


大 特価/ ¥285,000 


〈全 商品 新品 完全 保証 付〉 ■ 


ウーブ ポケ コン全 商品 販売 中， カタログ 特価 表 ご H 求く ださい （〒72) 


ぐ 0426- 45 -3001 一 3 

FAX.0426- 44 -6002 

» 営業時間/ 10:00~19:00 參 電話 受付/ 20:00 迄可參 定休日/日曜日 (祭日 営業） 


SHARP SUPER XEX SHOP 


アイビ ッ卜 電子 株式会社 〒！ 92 東京都 八 王子 巿北野 町 560-5 

拿本 誌 発売 時には 上記 価格より さらにお 求め やすい 価格に 変更され ている 場合が ありま す, 秦 この 広告の 


一い ■ 

送料 1 1 こ-; l:- X の 0 にお IW い 合わ せ I-' 1 1 ゝ 
★ の ift 品 は、 すべて 新品、 保 JiEW 付きです。 
•km 奴の ifti 品 は 充分 ffl ,«； してあります が、 ご it: 文の 
は. 在 I* の 確ぬ の 上..^^ はた は、 iSWitti 込で 
お 中し 込み 下さい。^ 商品 クレジット でも 极 つてお ります。 

., -, , ―., t ._ « お 屮 し 込みの [^は' ビ' ず^: ^ a?' つ 'を 'リに ヒ して ド さい,, 

j 匕 item 力 '"'<中》& まで お，. ん. 印れ の^は ごせれ ド さい。 


S 通販; 

憤 売 


富 士ま艮 行 八 王子 支店 （普） 1752505 


二 はすべ て 送料 '消費税 は 含まれて おりません:, 


夢と 自由で 一緒に やりましょう 

従業員と し 、うより 仲間と して • 



CG アーティ ス 卜' ネッ卜 ワーク 
/ a m=NET 
CG 作品 募集 中!！ 


C 言語、 アセンブラ できる 方 大歓迎 
業務 ソフ卜 • ゲーム 'CG 等 
経験に より 優遇し ます 


右 記まで 履歴書 を 送って 下さい 


システム フ ティ ック Jam 
〒593 大阪府 堺市津 久野町 3-33-18 
メイ プル ハウス 205 
Phone.0722-64-3770 


【広告 ctS 半 ページ》 もしかしたら 2 枚 組 かち しれない 90 年 9 月 号。 かも かも ( 


月 刊 m^m^^ 


90 年 9 月 号 (Vol.28) 

8 月 18 日 癸 送 
2HD ディスクに 入った XBBOOO のた めの 雑 讅だ つ/ 


もしも 2 枚 組 だったら 

LispBa B9 

そいでも つて 怒濤の 48 曲 組 

バッ 八の 平均律 クラ ビー ァ曲さ 

それから 


：ん どこ そき- 
フビ 


フビ 


芭蕪 PRO - 68K 


サビ 


おまえ も 改造 プログラム にして やる！ 

FINDP.X 


納涼 ，バージョンアップ 
バグ 取り 大会 


でもって、 やつ ぱ 夏 た' から それなりの プロ グラム 

その他、 便利な ツール、 PDD 、ビーフ'- ff、 読み物な ど を 満載 ！ 

(な お、 内容 は一 部 変更され る こ と が あり ま す。 ご 了承 下さい） 
編集長 祝一 平からの 御 挨拶 「ど 一もど 一も。 9 月 号 は 2 枚 組の 予定なん です が、 社員 旅行が ある しい、 お gfe 迫つ てるしい, 
だから あ、 ィザ となった らく じけ ちゃう かもしれ ない。 う ふつり」 

販売 方法 は 通信販売の みです。 お申し込みの 方法 は 左記の 住所へ 現金書留で 
定期 購読 5 ヶ月 分 6,000 円 （消 黄 税込-郵送料 サ— ビス） 

*8 月 18 日 以降に 受け付けた 分 は， 原則として Vol.28 から 発送し ます。 新たに « 読 
を 希望され る 方 は， 「新規」 と 御明 記 下さい， 


電脳 倶楽部 


満開 製作所 

〒171 東京都 豊島区 要 町 1-19-3 いさみ ビル 4F 
TE し (03)554-9282/FAX ズ 03)554-3856 


♦ 


参 郵便振替 を 御 利用の 場合 は 口座 番号 「東京 5-362847 満開 製作所」 でお 願いいた します。 

製品の 性格 上， 返品に は 応じられません が， お申し出が あれば 定期 購読 を 解約し 残金 をお 返しし ます,， 
(ご注意 ： パック ナンバーの 受け付け は、 定期 賄 読の 方に 限らせて いただきます） 


\"^7 ^Tl 一、 r ：リ 好評 発売中 

AXZ/ ^i^\y—y 定価 ¥a800 



XI エミュレータ は X68000 上で XI シリーズの アプリケーション を 実行す 
るた めの ソフ卜 エミ ユレ一 夕です。 XI の アプリケーション を 完全に ソフ卜 
ウェアの みで エミ ユレ 一 卜して いるた め、 XI 上での 実行 速度と 比較して、 
平均 3~5 倍 程度お そくなります が、 X68000 の マシン 上に 実現した 仮想 XI 
マシン を 楽しめます。 また、 XI と X68000 の 相互 間で ファイル を 転送す る 
ための ユー ティ リ ティ と 専用 ケーブルが 付属し ますので、 XI 上で 作り上げ 
たソフ 卜の 資産 を X6B000 上に 移行す る こと も 簡単に できます。 


エ^ ユレ一 夕の 機能 

* xi エミ ユレ一 タは xu こ 相当す る 機能 を エミ ユレ 一 卜。 

この 仮想 コンピュータに は 最大 4 つの ドライブが 仮想 的に 接続。 

• XI エミュレータ からみた ドライブ は Human68k の ドライブ 上に ある 
ファイルで 仮想 的に 実現。 この ファイル は XI 用の 5" 2D ディスクの ィ 
メージ を ファイル 転送 ユー ティ リ ティで まるごと 転送した もの。 


X 1 エミュレータで 仮想 的に 実現した X 1 は 仮想 ドライ ブか ら 起動。 
このため 仮想 ドライ ブ用 ファイルに は、 X 1 を 立ち上げる ために 必要な 
HuBASIC や CP''M などの システム プログラムが 必要。 
XI エミ ユレ 一夕で は、 XI の 持つ VRAM を 含む メモリ イメージ や 
ZBOG P U を 仮想 的に ソフ卜 ウェア で 実現。 


ファイル 転送 ユーティリティ 

I ディスク 転送 I 

XI ディスク 何 X68(M1 Human6Bk(5"20 ディスク イメージ ファイル） 
*X1 エミュレータ では Human6Bk 上の ディスク ィメ一 ジ ファイル を 仮 

想 ドライブ として 使用。 
I ファイル 転送 I 

XI BASIC :CP/MMX6B00(] HumanBBk 

*X1 で 作った プログラム S デ 一夕 を X68000 上で 使用。 

※付属の 専用 ケーブル を X 1 と X BB00D に 接続して ファイル を 転送し ます。 



エミ ユレ 一夕 QSA ： ) ：' 、 

Q. ファイル 転送の ために 別途 ケーブル を 買わない といけ ない 
のです か 7 

A. 専用の ケーブルが 付属し ますので その 必要 は あ り ません。 
Q. XI 已 ASIG の プログラム を X68000 上の X-BASIC で 使えます か 7 
A. 通常の セーブで は コードが 違ラ ので 使用で きません が、 アスキー セー 
ブ した ファイル であれば X-BAS に 上で そのまま ロード 可能です。 
Q. 丁 u「bo 已 ASIC で 作成した 住所録な どの 漢字 を 含んだ データが ある 
のです が X6B000 上に ファイル 転送で さます か 7 
A. XlTurbo も X6B0D0 も 漢字 は シフ卜 JIS コードな ので ファイルの 
転送 は 可能です。 ただし、 漢字 ROM を 必要と する もの はサ ポー 卜し 
ていません。 


Q. Turbo 用の ソフ卜 は 動きます か "？ 
A. XI 用の みで Turbo 専用の ソフ卜 は 動 さません。 

0. ゲーム は 動きます か 7 
A. 純粋に BASIC でか かれた ちの は 動きます が、 プロ テク 卜が かかった ち 
の や 直接 八 ードを アクセス する ような 市販の ゲーム は 動 さません。 

* タイミング 等 八 一 ドウ エアに 依存す るよ ラな ソフ卜 は、 原理 上 実行で きない、 もしくは 

正常に 動作し ない 場合が あります ので ご注意く ださい。 
* 一部 サ ポー 卜して いない 機能が あります。 

1X1 エミュレータ 通信販売 I 購入 希望と して 住所、 氏名、 電話番号 をお 知 
らせ ください 。注文書 をお 送り 致します。 


. * この 商品 価格に は 消費税 は 含まれて おりません。 

*CP/M は デジタル リサ- チ 社の 商標です。 有 〒101 東京 者 15 千代 田 区 神 田 神 保 町 卜 64 
文中の ソフトウェア は 各社の 商標です。 J \^ 神 イ呆町 愤 和 ビル 7F 

~% ； '-. * 製品の 仕様、 名称 は 予告な く 変更す る 場合 も ございま すので あらかじめ ご了承く ださい。 TSitL^ ノ ^™^"%Bf03(233)0200( 代） FAX. 03 (29 I ) 70 I 9 

《》,、、 


21 世紀 は 「自然の 世紀」/ 
あつまれ ナチ ユラ リス 卜 (大 

今 ほど 自然 を 痛めつ けて し \る 時代 はない な あとし A うのが 実感。 でも、 
自然 大好きの ヮ夕シ たち は 嘆いて ばかりではありません。 牛乳 パック 

を 材料に 手漉き の 八 ガキを 作る 人 (SIG メンバ一 に 送られた 八ガキ 
はすこし 分厚くて ザ ラザラ してい ましたが、 地球への 愛情が いっぱい 
の、 すごく 感動 的な ものでした。)、 休みの たびに 水辺の 鷗を 観に いく 
人、 資源の リサイクルに 取り組む 人 … • メンバ一 の 一人ひとりが 身近 
なと ころ や、 あるいは 個人の 力で はどラ しょ ラ もない ほど テツ カイ 問 
題に、 コッ コッと 取り組んで います。 SIG の ボードで は、 自然 を 絵で 語 
るた めに 作った ""YUKI 画像 通信 システム j による 美しい 画像 通信が 
自慢です。 (現在、 X68000 と 98 シリーズで デ一 夕 互換で きます。） 


自然 探険 隊） 

- その他 楽しい メニューが まだまだい つばい/， 

★ J & P ならではの/ い ノコ ン' 家電 製品 

の 会員 割引 も ある ON LINE SHOPPING。 

★ J & P だから 強い〃/ ぐ ノコ ン 情報 を はじめと する 
役に立つ DATA BASE。 

★ みんなで おしゃべり オンライン! ^一 ク （CHAT 機能 )o 
★ 地域 別 ■ テーマ 別 ボードで 充実の BBS (電子 掲示板 )o 
★ ビジュアル データ もばつ ちり 送受 洒 できる X- MODEM, 


JSP HOT LINE への ご 入会 は スター タキ ッ 卜で。 

^x^^^i ^t%. お求め は、 下記のお 店へ。 又は 現金書留に 

て、 ¥3.000+¥90( 消費税 3%) = ¥3.090 を 
事務局まで お送り 下さい。 
すぐに スター タキ ッ卜 をお 送りし ます。 

. „, ^, ^-. 亍 556 大阪市 浪速 M 曰 本 橋 西 1-6- G ±新, 機 株 ヺ さネ 土 
わ 1 巧い 。わ せ は JSP HOT LINE 事務局 宛 TEL.(06)632-2521 


ター 夕 キットの お求め は JSP 各店で どうぞ。 


東京 »渋さ 区 道玄坂 2 丁目 28*4 号 
東京都 町 田 市^ 野 1 丁目 39 番 16 号 
東京 讎八 王子 布 » 町 1眷1 号 八 王子 そごう 7F' 
東京都 立 川 巿幸町 4 - 39 - 1' 


巿 中 


3 


m 

富 山巿^ 町 ？ - レ 

金天巿 入， ェ 2 - 
金： 尺 巿寺地 2 - 
名古屋 市中 E 大項 4 丁目 2 


(03) 496-4141 
(0427123-1313 
(0426)26-4141 
10(0425)36-4141 
30(0462)25-1548 
100(0754)32-3133 
630(0762)91-1130 
3»(0762)47-2524 
480(052)262-1141 


テク ノ ランド 大阪市 浪速 区 日本 橋 5 丁目 6 番 7 号 0(06) 634-1211 孫 井寺 店 

メディア ラント 大阪市; 良 速 区 日本^ 5 丁目 8 番 26 号 0(06) 634-1511 岸 和 田 店 
コスモ ランド 大阪市, 良 速 Sit 波 中？ 丁目 1 番 17 号 tt(06) 634-3111 さんの みや 1はん8！ 

U.S. LAND 大阪市, 良 速 区 日本^ 4 丁目 9 番ほ号 tt(06) 634-14 に 西宮店 

ヒシ ネス ラント 大 HSffi 北 区 梅 田 卜 卜 3 大 K お w 第 3 ヒル B21T(06) 348-1881 0 路店 

m 田 店 大阪市 北 E 小 松 凍 B 了 1-100(06) 362-1 Ml 京都 寺 町 店 

离槻店 高槻市 高槻町 11 番 16 号 》(0726)85-1212 京都 近鉄 店 

くす は 店 枚 方 巿楠葉 花 围 町 15 番 2 号 》(0720)56-818〗 和歌 山 店 

干罜 中央 店 S 中 市お 千里 SSJ1-3SENCHUPAL2 き i^Ftt(06) 334-4141 奈良 1 はん 館 

m, 聿富田 店 な m 市 大 m m m ― io» (0726)93-7521 ff 山 インター g 

寝 屋川店 » 屋 川 巿ほ町 4 - 200(0720)34-1166 ^本店 


藤 井寺 巿岡 2 丁 目 1 番 33 号 0(0729)38-2 
岸 和 田 巿土生 町 ？ 451 - 311(0724)37-1021 
神 戸市 中央 区 八權通 3-2- 16fi(078)23 卜 21 1 1 
兵庫県 西宮 市； S 原 町 5 - 1 1 a (0798) 71 - 1 
(6»市1^1 丁目 1 番 ft 友 生 ビル 1F«(0792)K-，221 
京都市 下 京 区 寺 町 ii 仏 光^ 下ル * 美; 員 之 町 5490(075)341-」 
京都市 下 京 区 角 丸 通 七 条下ル Sfi 小路 町 7 に 0(075)341-5769 
和 歌 山 巿元寺 町 4 丁目 4 番 地 tl (073 め 28- 1 
奈良市 三条町 478 - ltt (0742)27-1 
大和 郡 山 巿根田 693 - 1«1(07435)9-2221 
^本 市 手 取 本 町 4 - 1?n(G96J 359-7800 


一 パソコン /ワープロ 通信 ネッ卜 ワーク サービス 

J&P«T 國删 匿 3 

隱 ？嶋规 (ジャンプ コ— ド: NATURAL) 



兵庫県 は 六 甲 山の 山の 中で、 ホ タル • s_ ティング を やりました。 

ホ タル を 初めて 見る 人 もあって、 雨の 中の たった 2 匹の ホタル に 
みんな 感動し ました。 その あと 小さな 水 溜まりで ィモ iJ の 親子 や 
オタ マジ ャ クシ や ヒル や ミズ スマシ と 遊び ま しだ。 真っ暗闇の 山 
中で 懐中電灯 片手に ィモ U をお つかけ るいい 歳 をした 人々 のよう 
すに、 はじめて 参加した 若い 人た ちが 呆れて いました。 


■mm r miM)J 


J 


N AT U R AL SPAC E の'、 ) : ft'ii 盹 1) H を 巡 かに 
超えた 広い 祝野 で 編^されて いま" I； 読んで みたい 
おは、 SIG まで どうそ; 1 そうして 気 に 人ったら 執" Tf 卜 ij 人に なって く 

ださい。 
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SHARP 


New-Life People 

' 


ADVANCED 

—先駆の" z" アビ リ ティが パソコン クリエ イタ 一 を 魅了す る。 一 

TURBO 



パーソナルコンピュータ +キ一 ポ一ド + マウス CZ-8 

8C-BK 標準価格 1 

59, 800 円 （稅 別） 

14 型 カラ一 ディスプレイ テレビ '•〕 二- S 

0D-BK 標準価格 

32, 200 円 （税別） 

チルト スタンド CZ-6 

5T1-B 標準価格 

5, 800 円 （税別) 


クリエ ィ ティブ マインド を 刺激す る AV 機能 テレビ、 ビデオ、 ビデオ ディ 

スク などの 映像 を 最大 4, 096 色の リアルな 画像で 瞬時に グラフィック 画面に 取 
り 込める カラ一 画像 デジ タイズ 機能 を 標準 装備 バ 段階の 量子化 取り込み、 42 
通りの モザイク 取り込み など 多彩な ド リック 取り込み 処理 も サポート。 さらに クロ マ 
キー 合成、 インタ 一レース スーパ一 インポ一 ズ、 4，096 色 対応 デジタル テ a ッパ櫬 
能 、ステレオ FM 音源'' 先駆の AV 機能が アート ワークの 領域 を さらに 拡げます。 


AV 指向の 高水準 ベーシック Z- 已 ASIC 搭載 多色 グラフィック、 力 
ラ一 画像処理 、ステレオ FM 音源 ノく ンク メモリ 対応な ど 、ターボ Z シリーズが 
本来 もつ クリエ ィ ティブな 機能 を フル サポート 0 また 豊富な 画面 モードで 多色 を 
駆使 するとき に 便利な グラフィック 用 関数 （HSV, RGB, HALF, CDOWN, 
CUP) も 装備。 さらに FM 音源 制御 用 ステートメントと して X68000 と 命令 コン 
パチの 拡張 MML の 採用に よ リス ムーズな 8 音 同時 演奏 を 実現して います。 


• メインメモリ 128K バイト 標準 装備、 Z-BASIC で 最大 576K バイトまで サボ一 卜 肇11^ バイトの 5 インチ フロッピーディスク ドライブ 2 基 搭載 *JIS 第 1/ 第 2 水準 準拠 漢字、 「システム' 
ユーザー 辞 害」 を 標準 装備した 高度な 日本語 処理 機能き ニュー デザインの マウス 標準 装備 タ一ポ シリーズの 豊富な ソフト 資産が 活用で きる コンパチブル 設計 鲁 ブリン タ、 
RS-232C など g 富な インタ一 フェイス を 装備 • ドット ピッチ 0.39 議の ハイ コントラスト ブラウン管、 15kHz/24kHz の デュアル スキャン 方式 採用 14 型 カラ 一ディスプレイ テレビ （別売）。 


； Af. _-y I J. l - .O.-fc* * お問い合わせ は… シャープ㈱ 電子 棟 器 事 if 本部 システム 機器 営業部〒 545 大阪市 阿倍野 区長 池 町 22 番 22 号 S(06)62 卜 1221( 大代 表） 
"《養、、 %± ま 子 事 》 本部 液晶 映像 システム 事業部 第 2 商品 企画 部〒 162 東京都 新 宿 区 市 谷 八 幅 町 8 番地 S(03)260- 1161 ( 大代 

C '、 T491 0217909569 雑誌 02179 - 9 


